从键盘上输入4个数，编写程序，计算并输出这4个数的和及平均值。要求用Inputbox函数输入数据。

Question

利用VB编写,谢谢!!

Answer 1

Private Sub Form_Load()
Dim a As Integer
Dim b As Integer
Dim c As Integer
Dim d As Integer
a = InputBox("请输入第一个数")
b = InputBox("请输入第二个数")
c = InputBox("请输入第三个数")
d = InputBox("请输入第四个数")
s = a + b + c + d
ave = s / 4
MsgBox ("和是" & s & "平均数是" & ave)
End Sub