7,763
社区成员
发帖
与我相关
我的任务
分享我倒！Join函数
因为要合并一个数组，自己写了一个：
Function Join(aName)
Dim i
Join = aName(0)
For i = 1 To UBound(aName)
Join = Join & " " & aName(i)
Next
End Function
在删除Join函数上面一个废函数的时候不小心把Join函数也删了，然后运行的竟然没出错，再到MSDN一查。我倒，原来vb有Join这个函数！
Function Join(aName)
Dim i
Join = aName(0)
For i = 1 To UBound(aName)
Join = Join & " " & aName(i)
Next
End Function
在删除Join函数上面一个废函数的时候不小心把Join函数也删了，然后运行的竟然没出错，再到MSDN一查。我倒，原来vb有Join这个函数！
...全文
请发表友善的回复…
发表回复
tztz520 2005-01-31
- 打赏
- 举报
-_-#
sirious 2005-01-31
- 打赏
- 举报
haha!
northwolves 2004-07-29
- 打赏
- 举报
VB6.0及以上才有。难得你写得如此经典！
