VB编程 输入七个评委的打分,计算出7个评委的平均成绩

Private Sub Command1_Click()
Dim sum, a As Integer
For i = 1 To 7
a = InputBox("")
sum = sum + a
Next
Print sum / 7
End Su