Foxtable(狐表)用户栏目专家坐堂 → 这段代码,问题在那里?


  共有3251人关注过本帖树形打印复制链接

主题:这段代码,问题在那里?

帅哥哟,离线,有人找我吗?
yedaoan
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:257 积分:1971 威望:0 精华:0 注册:2012/12/20 8:21:00
这段代码,问题在那里?  发帖心情 Post By:2013/12/26 8:58:00 [显示全部帖子]

在内部函数里做了一个函数,如下
Dim strSQL As String

For i As Integer =0 To 15
    If args(i) Is Nothing Then
        msgbox("没有了")
        Exit For
    Else
        strSQL=strSQL & args(i) & ";"
        msgbox(strSQL)
    End If
Next
Return true

 

在命令窗口,做了如下调用

Functions.Execute("Trans","I","Love","You","For","Ever")

运行到Ever都没有问题,接下来空值就出错了,如下图

 


图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看


 


图片点击可在新窗口打开查看此主题相关图片如下:2.png
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
yedaoan
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:257 积分:1971 威望:0 精华:0 注册:2012/12/20 8:21:00
  发帖心情 Post By:2013/12/26 9:18:00 [显示全部帖子]

For i As Integer =0 To args.length-1

这句有点看不太懂


 回到顶部
帅哥哟,离线,有人找我吗?
yedaoan
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:257 积分:1971 威望:0 精华:0 注册:2012/12/20 8:21:00
  发帖心情 Post By:2013/12/26 9:24:00 [显示全部帖子]

受教了,谢谢

 回到顶部