Foxtable(狐表)用户栏目专家坐堂 → 自定义函数,若符合某个条件时返回列表,在执行自定义函数时,该如何判断自定义函数的是否有返回数据啊?


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

主题:自定义函数,若符合某个条件时返回列表,在执行自定义函数时,该如何判断自定义函数的是否有返回数据啊?

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


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/16 14:26:00 [显示全部帖子]

Dim htid As String = Args(0)    '合同编号 
Dim Vals_r As New List(Of Double)
Dim hc As New HttpClient("http://ls.xinlianhuichuang.com/v1/lsjyje?id=" & htid)
    Dim ret As String = hc.GetData()
if ret = "" then return Vals_r 
……

调用
dim lst as List(Of Double) = function.execute("某函数",某参数)
if lst.count > 0 then 
msgbox("有返回值")
endif

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


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/16 14:55:00 [显示全部帖子]

messagebox.show(ret) 显示什么内容?

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


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/16 16:16:00 [显示全部帖子]

那就这样判断

Dim ret As String = hc.GetData()
messagebox.show(ret="" orelse ret="[]")

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


加好友 发短信
等级:超级版主 帖子:110750 积分:563676 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/9/16 17:29:00 [显示全部帖子]

没看懂。如果不需要返回值,那就不要解释函数的返回值,直接调用即可。

如果函数里可能返回,也可能不返回。那不要这样做,而是应该统一有返回,没有东西的时候返回空值好了。

 回到顶部