Foxtable(狐表)用户栏目专家坐堂 → 函数的接口


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

主题:函数的接口

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


加好友 发短信
等级:六尾狐 帖子:1498 积分:11164 威望:0 精华:0 注册:2014/8/13 16:19:00
函数的接口  发帖心情 Post By:2021/5/24 14:02:00 [只看该作者]

自定义的函数,能不能用集合或数组做参数?

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


加好友 发短信
等级:超级版主 帖子:110669 积分:563259 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/5/24 14:03:00 [只看该作者]

可以

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


加好友 发短信
等级:六尾狐 帖子:1498 积分:11164 威望:0 精华:0 注册:2014/8/13 16:19:00
  发帖心情 Post By:2021/5/24 15:18:00 [只看该作者]

命令窗口执行
------分割线-------
Dim Files As List(of String)
files.Add("abc")
files.Add("efg")
Functions.Execute("abc",files)


以下是函数abc
------分割线-------
Dim kkFiles As List(of String) = args(0)
msgbox(1)
Return True

报错
------分割线-------
---------------------------
版本:2020.5.29.8
---------------------------
代码执行出错,错误信息:



System.NullReferenceException: Object reference not set to an instance of an object.

   at UserCode.Test()
---------------------------
确定   
---------------------------


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


加好友 发短信
等级:超级版主 帖子:110669 积分:563259 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/5/24 15:37:00 [只看该作者]

Dim Files As new List(of String)
files.Add("abc")

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


加好友 发短信
等级:六尾狐 帖子:1498 积分:11164 威望:0 精华:0 注册:2014/8/13 16:19:00
  发帖心情 Post By:2021/5/24 17:01:00 [只看该作者]

换成数组呢?
---函数---
Dim kkFiles() As String = args(0)
For Each s As String In kkFiles
    msgbox(s)
Next
Return True

---执行---
Dim Files(3) As String
files(0) = "a"
files(1) = "b"
Functions.Execute("abc",files)



Exception has been thrown by the target of an invocation.
Unable to cast object of type 'System.String' to type 'System.String[]'.

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


加好友 发短信
等级:超级版主 帖子:110669 积分:563259 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/5/24 17:05:00 [只看该作者]

Functions.Execute("abc",files,true)

 回到顶部