谢谢大家帮我解答一个vb数组问题＜题目是：通过键盘输入10个数，输出最大．最小数和平均值，要求使用数组

vb代码:

Private Sub Form_Click()
Dim a(10)
For i = 1 To 10
a(i) = CInt(InputBox("输入第" & i & "个"))
Next
Max = a(1)
Sum = a(1)
Min = a(1)
For i = 2 To 10
Sum = Sum + a(i)
If t < a(i) Then
Max = a(i)
Else
Min = a(i)
End If
Next
MsgBox "最大的是" & Max & ",最小值是" & Min & ",平均值是" & (Sum / 10)
End Sub

要是回答的内容有问题，或认为不妥，请发送百度消息给我，消息内容加上本页网址哦。。

·