填空题
在窗体上添加一个命令按钮(名为Command1),然后编写如下程序。
Function m(x as Integer,y as Integer) as Integer
m=IIf(x>y,x,y)
End Function
Private Sub Command1_Click()
Dim a as Integer,b as Integer
a=1
b=2
MsgBox m(a,b)
End Sub
打开窗体运行后,单击命令按钮输出结果为______。
【参考答案】
B
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
在窗体上添加一个命令按钮(名为Command1)和一个文本框(名为Text1),并在命令按钮中编写如下事件代码。 Private Sub Command1_Click() m=2.17 n=Len(Str $(m)+Space(5)) Me!Text1=n End Sub 打开窗体运行后,单击命令按钮,在文本框中显示为______。
点击查看答案&解析
填空题
有如下程序段。 Public Sub xy (a As Integer,b As Integer) Dim t As Integer Do t=a Mod b a=b:b=t Loop While t MsgBox a End Sub 用Call xy(96,40)调用该通用过程后,输出结果是______。
点击查看答案&解析
相关试题
rs.movenext
fd+1