2. 计算机
  3. 在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，然后编写如下程序： Function Fun(x As Integer, y As Integer) As Integer Fun = IIf(x < y, x, y)

在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，然后编写如下程序： Function Fun(x As Integer, y As Integer) As Integer Fun = IIf(x < y, x, y)

admin2015-10-23  68
问题 在窗体上画一个命令按钮和一个文本框，其名称分别为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
程序运行后，按回车键，文本框中显示的内容为
选项 A、12
B、20
C、24
D、40
答案A
解析 Form_Load（）过程中，Command1获得焦点。当按回车键时，触发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。
转载请注明原文地址:https://www.kaotiyun.com/show/BJLp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)