如何把数组转换成字符串？

假设你的变量叫做 MyArray，我们可作如下处理：

Dim str
Dim strDelimiter
strDelimiter =","
' 用逗号隔开每个元素，转换数组为字符串
Dim iLoop 'Looping variable
' 循环变量 
For iLoop = LBound(MyArray) to UBound(MyArray)
 str = str&MyArray(iLoop)&strDelimiter
 Next

我们还有一种更为简单的方法，就是使用加入功能。这需要两个参数：数组命名和分隔符字符串，当然，后一个参数可以忽略而用空格来代替。我们看看上面的处理就会变成：

Dim str 
Dim strDelimiter
 strDelimiter =","
str = join(MyArray, strDelimiter)