求代码详细解释
Dim XH() As Integer = {1, 2, 3} '共有数组3个都是整数型
Dim Xm(3) As String
Dim s As String = ""
Xm(0) = "张三"
Xm(1) = "李四"
Xm(2) = "孙五"
For i As Integer = 0 To 2
s &= XH(i) & " ;" & Xm(i) & vbCrLf
Next
MsgBox(s)
End Sub


谢谢你的解释！vb.net的书少的可怜，书店架子上一码C 、C++最多的是JAVE ！