在窗体上画一命令按钮和一文本框,其名称分别为Commandl和Textl,然后编写如下程序: Function Fun(x As Integer, Y As Integer)As Integer Fun=IIf(x

admin2018-10-15  21

问题 在窗体上画一命令按钮和一文本框,其名称分别为Commandl和Textl,然后编写如下程序:
Function Fun(x As Integer,
  Y As Integer)As Integer
  Fun=IIf(xEnd Function
Private Sub Form Load()
    Command1.Default=True
End Sub
Private Sub Commandl_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

解析 命令按钮的Defa,ult属性用于设置窗体的缺省命令按钮,程序运行时,按下键将执行该命令按钮的单击事件过程。IIf函数可用来执行简单的条件判断操作,它是“If…then…Else”结构的简写版本。格式为:Result=IIf(<条件>,)。当<条件>为真时,IIf函数返回,而当<条件>为假时,返回。本题在函数Fun中判断x是否比y小,如果小则返回x作为返回值,否则返回y作为返回值,即返回两个参数中的最小值。
转载请注明原文地址:https://kaotiyun.com/show/SFFp777K
0

最新回复(0)