Join可以将數組以指定字符分開,連成一個字符串。如:
Sub Example()
Dim arr(1 To 10), i As Integer, txt As String
For i = 1 To 10 '給數組賦值
arr(i) = i
Next i
txt = Join(arr, ",") '将arr數組的元素連成字符串,用逗号作分隔符
MsgBox txt
End Sub
Join的第二參數,即分隔符可以不指定,在不指定時,默認為以空格作分隔符。
運行結果:
更多精彩资讯请关注tft每日頭條,我们将持续为您更新最新资讯!