题目内容:
在窗体上画1个名称为Command1的命令按钮和2个名称分别为Textl、Text2的文本框,如图所示,然后编写如下程序:Function Fun(x As Integer,ByVal Y As Integer)As Integer
x=x+y
If x<OThen
Fun=x
Else
Fun = Y
EndIf
End Function
Private Sub Command i Click()
Dim a As Integer,b As Integel
A=-10:b=5
Textl.Text=Fun(a,B.
Text2.Text=Fun(a,B.
End Sub
程序运行后,单击命令按钮,Textl和Text2文本框显示的内容分别是【l】和【2】。
参考答案:【答案仅供学习,请勿对照自行用药等】
答案解析: