VB中一维数组a有10个数组元素,每个数组元素的值等于其下标的平方,请输出数组元素的值?

2025-05-09 16:37:02
推荐回答(1个)
回答1:

Private Sub Command1_Click()
Dim a(9) As Integer
Dim i As Integer
For i = 0 To 9
a(i) = i ^ 2
Print a(i);
Next
Print
End Sub