问题
填空题
在窗体上画1个名称为Command1和命令按钮和2个名称分别为Text1、Text2的文本框,如图所示,然后编写如下程序:
Function Fun(X As Integer,ByVal y As Integer)As Integer
x=x+y
If X<0 Then
Fun=x
Else
Fun=y
End If
End Function
Private Sub Command1 Click()
Dim a As Integer,b As Integer
a=-10:b=5
Text1.Text=Fun(a,B)
Text2.Text=Fun(a,B)
End Sub
程序运行后,单击命令按钮,Text1和Text2文本框显示的内容分别是()和()。
答案
参考答案:-5;5
解析:
[评析] Fun函数的目的是修改参数x的值为x+y,如果x<0,则返回x,否则返回y。 执行Command1_click时,初始a=-10,b=5,执行第一个Fun函数后,a的值为-5,小于0,故返回a的值-5。执行第二个Fun函数后,a的值为0,不小于0,故函数返回b的值5。所以本题两空分别为-5及5。