在vb中如何实现用msgbox现实数组中的所有值

在vb中如何实现用msgbox显示数组中的所有值

2024-11-30 18:28:25

推荐回答（3个）

回答1：

Private Sub Command1_Click()
Dim s(1 To x) As String 'x就是你数组的大小了
Dim st As String
'假定这个数组里已经有值了

For i = 1 To x
st = st & Space(1) & s(i) & Chr(10) & Chr(13) 'chr(10)与chr(13)为换行 space(1)为1个空格如需要则写上
Next i
MsgBox st
End Sub

回答2：

1、先用循环语句把数组放到一个字符串变量中
2、比如字符串变量为F，msgbox F 就行了
懂吗？不懂追问

回答3：

用一个for循环就可以了