Question

vb那，急求答案，请高手帮我解决那！！！！

1.设工程文件中有两个窗体form1,form2, 一个标准模块module1,设在form2的代码中定义了以下过程:
Sub aaa(x,y,z)
z=x^2+y^2
end sub
在Module1中定义了以下过程:
Sub bbb(x,y,z)
z=x^3+y^3
end sub

在form1 中单击命令按钮command1时,调用以上过程计算两个数的平方和与立方和,并分别将结果显示在文本框text3和text4中,请在以下程序段中写出相应的调用语句.
Private sub command1_click()
a=val(text1.text)
b=val(text2.text)
Call (1)
Text3.text=c1
bbb (2)
text4.text=c2
end sub

2 将上题的aaa过程和bbb过程改成用函数过程实现,函数名仍为aaa和bbb.改写程序,完成相同的功能
aaa函数过程:
______(3)__________
______(4)_______ __
_______(5)_________

bbb函数过程:
_____(6)__________
_____(7)__________
_____(8)_______ __
Private sub command1_click()
a=val(text1.text)
b=val(text2.text)
____(9)____________
_____(10)___________
end sub

Answer 1

1
Private Sub command1_click()
a = Val(Text1.Text)
b = Val(Text2.Text)
Call Form2.aaa(a, b, c1)
Text3.Text = c1
bbb a, b, c2
Text4.Text = c2
End Sub
2
Function bbb(x, y)
bbb = x ^ 3 + y ^ 3
End Function

Function aaa(x, y)
aaa = x ^ 2 + y ^ 2
End Function

Private Sub command1_click()
a = Val(Text1.Text)
b = Val(Text2.Text)
Text3.Text = Form2.aaa(a, b)
Text4.Text = bbb(a, b)
End Sub