以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  内部函数执行后的结果,如何进行调用或弹出  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=185665)

--  作者:cnsjroom
--  发布时间:2023/3/8 18:00:00
--  内部函数执行后的结果,如何进行调用或弹出
\'\'\'
Dim Multi As String = Args(0)

Dim b As Integer
Dim Values() As String
If Multi > "" AndAlso Multi.Contains("、") Then
    Values = Multi.split("、")
    b=Values.count
Else If Multi > "" AndAlso Multi.Contains(",") Then
    Values = Multi.split(",")
    b=Values.count
End If
Return b

Functions.Execute("字符串统计","1,2,3,4")
如何弹出4这个结果呢?

--  作者:SbFox
--  发布时间:2023/3/8 18:24:00
--  
msgbox(Functions.Execute("字符串统计","1,2,3,4"))