单选题 在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,然后编写如下程序:
Function Fun(x As Integer, y As Integer)As Integer
Fun=IIf(x<y,x,y)
End Function
Private Sub Form_Load()
Command1.Default=True
End Sub
Private Sub Command1_Click()
Dim a As Integer, b As Integer
a=20
b=12
Text1.Text=Str(Fun(a,b))
End Sub
程序运行后,按Enter键,文本框中显示的内容为______。
【正确答案】 A
【答案解析】[解析] Form_Load()过程中,Command1获得焦点。当按Enter键时,触发Command1_Click()事件。该事件中给定a和b的值,并调用函数Fun。函数Fun返回整型数据。IIf(x<y,x,y)表示的意思是x<y成立时,返回x,否则返回y。函数调用时传过来的参数是x=20,y=12。因此IIf(x<y,x,y)返回的值是12。选A。