我想从 LotusScript 中的函数返回一个列表。
eg.
Function myfunc() List As Variant
Dim mylist List As Variant
mylist("one") = 1
mylist("two") = "2"
myfunc = mylist
End Function
Dim mylist List As Variant
mylist = myfunc()
这可能吗?
如果是这样,正确的语法是什么?
看来您无法从函数返回列表。
您可以轻松地将其包装在一个类中并返回该类。
eg.
Class WrappedList
Public list List As Variant
End Class
Function myfunc() As WrappedList
Dim mylist As New WrappedList
mylist.list("one") = 1
mylist.list("two") = "2"
Set myfunc = mylist
End Function
答案在这里找到:LotusScript 的 List 错误再次出现 http://dominounlimited.blogspot.com/2008/06/lotusscripts-list-bug-strikes-again.html?showComment=1212495540000#c8995286986513838505
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)