在窗体中添加命令按钮cmd,并编写如下程序:
Funtion panduan(x As Integer,y As Integer) As Integer
panduan=IIF(x>y,x,y)
End Function
Private Sub cmd_click()
Dim a As Integer,b As Integer
a=4
b=7
MsgBox panduan( a, b)
End Sub
打开窗体单击命令按钮,消息框中输出的结果为【 】。
第1题:
在窗体中添加一个命令按钮,并编写如下程序: Private Sub Command1_CliCk() X=1∶Y=2∶Z=3 X=Y∶Y=Z∶Z=X Print Z End Sub 程序执行后,输出的结果是______。
A.3
B.0
C.2
D.1
第2题:
在窗体上添加一个命令按钮(名为Command1),然后编写如下程序:
Function m(x as Integer,y as Integer) as Integer
m=IIf(x>y,x,y)
End Function
Private Sub Commandl Click()
Dim a as Integer,b as Integer
a=1
b=2
MsgBox m(a,B)
End Sub
打开窗体运行后,单击命令按钮,消息框的输出结果为【 】。
第3题:
在窗体中添加一个命令按钮Command1,并编写如下程序: Private Sub Command1_Click() x = InputBox(x) If x ^ 2 = 9 Then y = x If x ^ 2 < 9 Then y = 1 / x If x ^ 2 > 9 Then y = x ^ 2 + 1 Print y End Sub 程序运行时,单击命令按钮,在InputBox中输入3,然后单击“确定”按钮,程序的运行结果为()。
A.3
B.0.33
C.17
D.0.25
第4题:
A、33
B.34
C.3
D.3
第5题:
在窗体中添加一个命令按钮,名称为Commandl,然后编写如下程序:
窗体打开运行后,单击命令按钮,则消息框的输出结果为__________。