在窗体上画1个名称为Command1和命令按钮和2个名称分别为Text1、Text2的文本框,如图所示, 然后编写如下程序: Function Fun(X As Integer,ByVal y As Integer)As Integer x=x+y If

admin2009-03-15  19

问题 在窗体上画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。
转载请注明原文地址:https://jikaoti.com/ti/izq0FFFM
0

最新回复(0)