以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如何把函数的参数传入它调用的函数?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=159346)

--  作者:小美菜
--  发布时间:2020/12/23 8:44:00
--  [求助]如何把函数的参数传入它调用的函数?
我碰到一个函数传递问题,我调用了一个不定参数个数的内部函数A,在这个内部函数中又调用另外一个内部函数B,内部函数B的参数有时与A的参数一样有时增多或减少,如何实现这样的参数传递?
--  作者:有点蓝
--  发布时间:2020/12/23 8:50:00
--  
比如

dim s1 as string = args(0)
dim s2 as string
if args.length > 1 then
s2 = args(1)
end if
dim s3 as string
if args.length > 2 then
s3 = args(2)
end if

if s2 > "" then
处理参数2的代码
end if
if s3 > "" then
处理参数3的代码
end if

--  作者:小美菜
--  发布时间:2020/12/23 12:06:00
--  
谢谢老师的讲解,可能是我表达不清。
Dim MainDc As Dictionary(Of String,Object)= Args(0)
If Args.Length < 2 Then Return False ’Args.Length 可能取值在 2~15之间,是不确定的
Functions.Execute("Fun九级",Args) ‘也就是这个Args有时与传入的参数一样有时增多或减少

--  作者:逛逛
--  发布时间:2020/12/23 12:12:00
--  
你直接放在字典里传递不行吗?
--  作者:小美菜
--  发布时间:2020/12/23 13:13:00
--  
字典有字典的用处,其它数据转成字典再传,麻烦
--  作者:有点蓝
--  发布时间:2020/12/23 13:48:00
--  
Functions.Execute("Fun九级",Args) 这样直接使用就行呀,有什么问题?如果还有增加其它参数,直接加Functions.Execute("Fun九级",Args,a,b,.....)