vb6---有a1="xxx" a2="xxxx"........ a100="xxxxx" 现在想用msgbox显示里面的内容
有
a1="xxx"
a2="xxxx"........
a100="xxxxx"
一个变量命名为b(b里为随机的1-100的数字),需要用msgbox显示a1-a100里面的内容，其中a1-a100选取的数字以b为准，请问这种问题该怎么处理，高手们帮帮忙，谢谢了
我尝试过这样做:
msgbox "a" & b
但是输出的数值是"a100"（这里假设变量b中的数字为100）,并不是我想要的a100中的"xxxxx"
这就要使用数组了
Private Sub Command1_Click()
Dim a(1 To 100) As String ' 定义一个数组，里面有100个项
'接下来这段只是对每一个项目里进行赋值
For i = 1 To 100
a(i) = i
Next
MsgBox a(100)' 输出第100项的值
End Sub
Private Sub Command1_Click()
Dim a(1 To 100) As String ' 定义一个数组，里面有100个项
'接下来这段只是对每一个项目里进行赋值
For i = 1 To 100
a(i) = i
Next
MsgBox a(100)' 输出第100项的值
End Sub
温馨提示：内容为网友见解，仅供参考
无其他回答
...a100="xxxxx" 现在想用msgbox显示里面的内容
这个用数组更好处理 Dim a(100) as String a(0)="xxx"a(1)="xxxx"...a(99)="xxxxxx"需要的时候就可以 msgbox a(b) 其中0≤b≤99 如果坚持那样，似乎在VB有点麻烦，其他编程语言可以用eval解决。具体参考 http:\/\/zhidao.baidu.com\/question\/94872081.html ...
...a100="xxxxx" 现在想用msgbox显示里面的内容
这就要使用数组了 Private Sub Command1_Click()Dim a(1 To 100) As String ' 定义一个数组，里面有100个项 '接下来这段只是对每一个项目里进行赋值 For i = 1 To 100 a(i) = i Next MsgBox a(100)' 输出第100项的值 End Sub ...
相似回答
