以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]内部函数传值  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=173671)
--  作者：浙江仔
--  发布时间：2021/12/11 9:04:00
--  [求助]内部函数传值

函数1WebCheckUserByOpenid2UserName：

Dim e As RequestEventArgs = Args(0)
\'系统身份验证,公众号,企业号,钉钉
Dim Openid As String \'微信用户Openid
Dim wb As weui =args(1)
Dim PersonName =args(2)

 

PersonName=……  \'赋值

Return Openid

 

页面函数2：

Dim e As RequestEventArgs = Args(0)
Dim wb As New weui
Dim PersonName As String

Dim openid As String

Openid = Functions.Execute("WebCheckUserByOpenid2UserName",e,wb,PersonName)

 

 

页面函数2中，能不能通过函数1获取PersonName的值？

 

 

 

 

 

[此贴子已经被作者于2021/12/11 9:04:23编辑过]
--  作者：有点蓝
--  发布时间：2021/12/11 9:13:00
--  
方法1、拼接字符串

PersonName=……  \'赋值

Return Openid & "|" & PersonName

接收

Dim openid，PersonName As String

dim ss() as string = Functions.Execute("WebCheckUserByOpenid2UserName",e,wb,PersonName).split("|")

openid = ss(0)

PersonName  = ss(1)


方法2，返回数组

PersonName=……  \'赋值

Return {Openid,PersonName}

接收

Dim openid，PersonName As String

dim ss() as string = Functions.Execute("WebCheckUserByOpenid2UserName",e,wb,PersonName)

openid = ss(0)

PersonName  = ss(1)
--  作者：浙江仔
--  发布时间：2021/12/11 9:18:00
--  

谢谢！

那为什么 函数中wb好像是通过参数直接传的？

是跟本身wb的类型有关吗？

Dim wb As New weui

Dim wb As weui =args(1)
--  作者：有点蓝
--  发布时间：2021/12/11 9:27:00
--  
返回值和传参数不是一个东西，传入参数可以是多个。返回值只能有一个