在vb中如何实现用msgbox现实数组中的所有值
答案:3 悬赏:30 手机版
解决时间 2021-03-08 18:54
- 提问者网友：我的未来我做主
- 2021-03-08 08:27
在vb中如何实现用msgbox显示数组中的所有值
最佳答案
- 五星知识达人网友：从此江山别
- 2021-03-08 09:58
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
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
全部回答
- 1楼网友：大漠
- 2021-03-08 12:03
dim a(1) as string
a(0)="test"
a(1)="字符"
for i = 0 to 1
s=s & a(i) & vbcrlf
next
msgbox s
- 2楼网友：患得患失的劫
- 2021-03-08 10:59
1、先用循环语句把数组放到一个字符串变量中
2、比如字符串变量为F，msgbox F 就行了
懂吗？不懂追问
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯