Foxtable(狐表)用户栏目专家坐堂 → 如何编写带参数的内部函数?


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

主题:如何编写带参数的内部函数?

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


加好友 发短信
等级:婴狐 帖子:73 积分:594 威望:0 精华:0 注册:2014/9/20 22:13:00
如何编写带参数的内部函数?  发帖心情 Post By:2014/10/8 14:26:00 [显示全部帖子]

例如:我编写了一个带参数的内部函数如下:

Dim Arg1() As String    'Arg1(0)=字符串1如“你好”,Arg1(1)=字符串2,如“我也很好”
Dim Arg2 As String   'Arg2 为字符串3 如“你能来吗?”

MessageBox.Show(Arg1(0) & Arg1(1) & Arg2)

return

 

调用部分为:

 

Functions.Execute("New_TarifFileListView","你好", "我也很好", "你能来吗?")

 

这样调用有问题。请问调用部分应该如何写才正确?再次感谢。刘海屋

 


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


加好友 发短信
等级:婴狐 帖子:73 积分:594 威望:0 精华:0 注册:2014/9/20 22:13:00
  发帖心情 Post By:2014/10/10 16:16:00 [显示全部帖子]

谢谢您的帮助。可能我的问题未提清楚。下面是个例子:

         Dim Arg As String = "New_CommuW"
         Functions.Execute("New_EmailwithAttachment", Arg)

错误提示:

         自定义函数 New_EmailWithAttachments 执行出错,错误信息如下:

         ....

         System.ArgumentNULLException值不能为空

         参数名:Key

          ....

希望能得到您的进一步帮助。谢谢。

 

刘海屋

 

 

 


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


加好友 发短信
等级:婴狐 帖子:73 积分:594 威望:0 精华:0 注册:2014/9/20 22:13:00
  发帖心情 Post By:2014/10/10 20:33:00 [显示全部帖子]

你好。我写全一个简化的自定义函数和其调用如下:

1。自定义函数(函数名=New_EmailWithNoAttachment):

    

Dim New_EmailWithNoAttachment() As String = Args(2)


Dim Pnl2 As WinForm.Panel = Forms(Args(0)).Controls(Args(1))
Pnl2.Visible = True

 

2. 调用程序为:

  

Functions.Execute(("New_EmailwithNoAttachment"), "New_CommuW", "Pnl2")

 

3。错误信息为:

    自定义函数“New_EmailWithNoAttachment"执行出错,错误信息如下:

      System.IndexOutOfRangeException索引超出了数组界限

      在UserCode.AE.....Azw(Objet[]Args)

 

请帮助分析错误在哪里,万分感谢。

刘海屋


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


加好友 发短信
等级:婴狐 帖子:73 积分:594 威望:0 精华:0 注册:2014/9/20 22:13:00
  发帖心情 Post By:2014/10/11 17:35:00 [显示全部帖子]

我的问题其实很简单。就是:FoxTable中带参数(1 个以上的字符串参数)的内部函数的写法,和调用程序的句法。简单写一个小例子即可。谢谢

 回到顶部