单项选择题

在窗体上画一个命令按钮，然后编写如下程序。运行后，单击命令按钮，输出结果为 ( )。
Private Sub Command4_Click()
Dima As Integer,bASInteger
a=1
b=2
PrintN(a,b)
End Sub
Function N(X As Integer,yAsInteger)AsInteger
N=IIf(x＞y，x，y)
End Funcfion

<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画1个文本框，其名称为Text1，然后编写如下过程： Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Text1_Key Up(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode+2) End Sub 程序运行后，把焦点移到文本框中，此时如果敲击“A”键，则输出结果为( )。
单项选择题
先在窗体上添加一个命令按钮，然后编写如下程序： Function fun(ByValnum As Long)As Long Dim k As Long k=1 num=Abs(nam) Do While num k=k*(num Mod 10) num=num 10 Loop Fun=k End Function PrivateSubCommandl_Click() Dim n As Long Dim r As Long n=InrputBox(“请输入一个数”) n=CLng(n) r=-fun(n) Printr End Sub 在程序运行后，单击命令按钮，在对话框中输入“100”，输出结果是( )。
A．0
B．100
C．200
D．300
相关试题