不用循环是什么意思?
据我的理解,除非确认只有4个固定数组元素,其他都可能会用到循环,这样写比较简便,比如下面的代码:
Private Sub CommandButton1_Click()
MyArray = Array(1, 3, 4, 5)
MyStr = ""
For i = 0 To UBound(MyArray)
MyStr = MyStr & ",a" & MyArray(i) & ":z" & MyArray(i)
Next
MyStr = Right(MyStr, Len(MyStr) - 1)
MsgBox MyStr
End Sub