Question

如何解答下面的VB实训题？

单击【输入成绩、输出平均分】命令按钮，一次弹出三个输入框，分别提示用户输入语文、数学、英语成绩，单击最后一个输入框的【确定】按钮后，窗体上输出平均成绩。

Answer 1

Private Sub Command1_Click()

    Dim YU, SHU, WAI

    YU = InputBox("请输入语文成绩：")

    SHU = InputBox("请输入数学成绩：")

    WAI = InputBox("请输入英语成绩：")

    Print (Val(YU) + Val(SHU) + Val(WAI)) / 3

End Sub