vb定义一个数组,对数组中的每个元素用其数组的位置进行赋植输出
11121314152122232425313233343541424344455152535455...
11 12 13 14 15
21 22 23 24 25
31 32 33 34 35
41 42 43 44 45
51 52 53 54 55 展开
21 22 23 24 25
31 32 33 34 35
41 42 43 44 45
51 52 53 54 55 展开
1个回答
展开全部
Module Module1
Sub Main()
Dim intList(4, 4) As String
Dim i, j As Integer
For i = 0 To 4
For j = 0 To 4
intList(i, j) = Str(i + 1) & Str(j + 1)
Next
Next
For i = 0 To 4
For j = 0 To 4
Console.Write(intList(i, j) & " ")
Next
Console.WriteLine()
Next
Console.Read()
End Sub
End Module
Sub Main()
Dim intList(4, 4) As String
Dim i, j As Integer
For i = 0 To 4
For j = 0 To 4
intList(i, j) = Str(i + 1) & Str(j + 1)
Next
Next
For i = 0 To 4
For j = 0 To 4
Console.Write(intList(i, j) & " ")
Next
Console.WriteLine()
Next
Console.Read()
End Sub
End Module
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询