帮忙做两道vb编程题

来源：百度知道 编辑：UC知道 时间：2024/06/14 16:00:55
1.已知a=6,b=9.求c=根号a平方+b平方.
2.通过随机函数产生2个两位正整数,求这两个数之和并显示.
我的邮箱在这里:elric01657@163.com

sedlover@163.com

给分吧

No1
Private Sub Form_Click()
Dim a as integer,B as integer,C as single
a=6
b=9
c=sqr(A^2+B^2)
Print C
End Sub

No2:
Private Sub Form_Click()
Dim a As Integer, b As Integer
Randomize
a = Int(Rnd * 1000)
b = Int(Rnd * 1000)
Print a; "+"; b; "="; a + b
End Sub

代码已经发到你邮箱