| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 自定义函数传递参数 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=168863) |
| -- 作者：newsun2k -- 发布时间：2021/5/25 9:46:00 -- 自定义函数传递参数 自定义函数如果参数包括datarow，函数内更新datarow，结果可以在函数外保存 如果函数希望返回一个布尔值的执行结果，同时返回一个错误的信息提示。怎么实现？ 类似：function abc(dr as datarow,strMsg as string) as boolean
|
| -- 作者：有点蓝 -- 发布时间：2021/5/25 10:30:00 -- 返回一个数组，比如 Dim MaxVal As Double = Args(0) For i As Integer = 1 To Args.Length - 1 MaxVal = Math.Max(MaxVal,Args(i)) Next dim ret(1) as object ret(0) = true ret(1) = “xx错误” Return ret 调用 dim ret = Functions.Execute("Max") msgbox(ret(0)) msgbox(ret(1))
|