发布时间:2019-07-29 17:47:38
问题是你要怎么输入,简单的如
Private Sub Command1_Click()
Dim a As Integer, b As Integer, c As Integer
a = inpotbox("输入第一个数")
b = inpotbox("输入第二个数")
c = a * a + b * b
Print c
End Sub