Question

.定义一个数组,类型是integer,包含5个元素,使用for循环和inputbox赋值,最后计算出

1.定义一个数组，类型是integer，包含5个元素，使用for循环和inputbox赋值，最后计算出他们的均值，把均值和第3个下标变量输出来。急急！！！

Answer 1

Private Sub Command1_Click()
Dim a(5) As Integer
For i = 1 To 5
a(i) = Val(InputBox("请输入A(" & i & "):"))
s = s + a(i)
Next i
MsgBox ("平均值=" & s / 5 & " A(3)=" & a(3))
End Sub

追问

可以使用for循环吗？我是新手。。

追答

这不用的就是For循环吗？