vb6.0框架下,有a1="xxx" a2="xxxx"... a100="xxxxx" 现在想用msgbox显示...

发布网友发布时间：2024-10-14 04:59

共2个回答

热心网友时间：2024-10-14 07:22

这个用数组更好处理
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

热心网友时间：2024-10-14 07:20

Public a100 As String
Private Sub Command1_Click()
a100 = "xxxxx"
b = "a"
c = "100"
MsgBox CallByName(Me, b & c, VbGet)
End Sub
更多VB代码可参阅我的博客：http://hi.baidu.com/zgmg/blog/item/63629751c4906406377abe46.html

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com