VB编程,任意输出两个数计算和与平均值并输出
Private Sub Command1_Click()
a = Val(InputBox("第1个数="))
b = Val(InputBox("第2个数="))
MsgBox (a & "与" & b & vbCrLf & "和=" & a + b & vbCrLf & "平均数=" & (a + b) / 2)
End Sub