VB 编程问题~

来源:百度知道 编辑:UC知道 时间:2024/06/14 15:15:34
编制程序要求输入整数a和b,若a2+b2大于100,则输出a2+b2百位以上数字,否则输出两数之和。
是啊 !

原来是平方,我还以为你打错了呢!
Private Sub Command1_Click()
a = InputBox("请输入a的值:")
b = InputBox("请输入b的值:")
If Val(a)^2 + Val(b)^2 > 100 Then
For i = 100 To Val(a)^2 + Val(b)^2
Print i
Next
Else
Print Val(a)+ Val(b)
End If
End Sub

- -

a的平方加b的平方?

Private Sub Command1_Click()
a = Val(InputBox("请输入a的值:"))
b = Val(InputBox("请输入b的值:"))
If a + b <= 100 Then
Print a + b
Else
c = a + b
c = c \ 100
Print c
End If
End Sub