问题 填空题

在窗体上画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。

单项选择题