[单项选择]在窗体上画一个命令按钮，其名称为Command1。程序运行后，单击命令按钮，输出结果是( )。 Private Sub p1(n As Integer) For i=n To 1 Step-1 x=String(i,"*") Print x Next i End Sub Private Sub Command1_Click（　） p1(3) End Sub

[单项选择]在窗体上画一个命令按钮，名称为Command1。程序运行后，如果单击命令按钮，则显示一个输入对话框，在该对话框中输入一个整数，并用这个整数作为实参调用函数过程F1。在F1中判断所输入的整数是否是奇数，如果是奇数，过程F1返回1，否则返回0。能够正确实现上述功能的代码是( )。
A. Private Sub Command1_Click() x=InputBox("请输入整数") a=F1(Val(x)) Print a End Sub Function F1(byRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End Funcfion
B. Privae Sub Command1_Click() x=InputBox("请输入整数") a=F1(Val(x)) print a End Sub Function F1(byRef b As Integer) If b Mod 2=0 Then F1=0 Else F1=1 End If End Function
C. Private Sub Command1_Click() x=InputBox("请输入整数") F1(Va(x)) Print a End Sub Function F1(byRef b As Integer) If b Mod 2=0 Then F1=1 Else F1=0 End If End Funcfion
D. Private Sub Command1_Click() x=InputBox("请输入整数") F1(Val(x)) Print a End Sub Function F1(ByrRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End Function

[单项选择]在窗体上画一个命令按钮，其名称为Command1。程序运行后，单击命令按钮，输出结果为 ( )。 Private Sub p1(n As Integer) For i=n To 1 Step-1 x=String(i, "*") Print x Next i End Sub Private Sub Command1_Click（　） p1 (3) End Sub
A. * * * * * *
B. * * * * * *
C. * * *
D. * * * * * *

[单项选择]在窗体上画一个命令按钮，名称为Command1。单击命令按钮时，执行如下事件过程： Private Sub Command1_Click（　） 　　a$="software and hardware" 　　b$=Right(a$,8) 　　c$=Mid(a$,1,8) 　　MsgBox a$,,b$,c$,1 End Sub 则在弹出的信息框的标题栏中显示的信息是( )。
A. software and hardware
B. software
C. hardware
D. 1

[单项选择]在窗体上画一个命令按钮，名称为Command1。单击命令按钮时，执行如下事件过程： Private Sub Command1_Click( ) a$="software and hardware" b$=Right(a$，8) c$=Mid(a$，1，8) MsgBox aS，b$，c$，1 End Sub 则在弹出的信息框的标题栏中显示的信息是
A. software and hardware
B. software
C. hardware
D. 1

[单项选择]在窗体上画一个命令按钮，名称为Comraandl。单击该命令按钮时，执行如下事件过程： Private Sub Command1_Click（　） a$="software and hardware" b$=Right(a$, 8) c$=Mid(a$, 1, 8)+b$ MsgSox a$, 1, b$ End Sub 则在弹出的消息框的标题栏中显示的信息是______。
A. software and hardware
B. software
C. hardware
D. 1

[单项选择]在窗体上画一个命令按钮，命名为CommandI。程序运行后，如果单击命令按钮，则显示一个输入对话框，在该对话框中输入一个整数，并用这个整数作为实参调用函数过程 F1，在F1中判断所输入的整数是否是奇数，如果是奇数，过程F1返回1，否则返回0。 能够正确实现上述功能的代码是
A. Privme Sub Command1_Click() x=InputBox(“请输入整数”) a=F1(Val() Print a End Sub Function F1(ByRef b As Intege If b Mod 2=0 Then Return 0 Else Return 1 End If End Function
B. Private Sub Command1_Click() x=InputBox(“请输入整数”) a=F1(Val() Print a End Sub Function F1(ByRef b As Intege If b Mod 2=0 Then F1=0 Else F1=1 End If End Function
C. Private Sub Command1_Click() x=InputBox(“请输入整数”) F1(Val() Print a End Sub Function F1(ByRef b As Intege If b Mod 2=0 Then F1=1 Else F1=0 End If End Function
D. Private Sub Command1_Click() x=InputBox(“请输入整数”) F1 (Val() Print a End Sub Function F1(ByRef b As Intege If b Mod 2=0 Then Return 0 Else Return 1 End If End　Function

[单项选择]在窗体上画一个命令按钮，然后编写如下程序 　　Private Sub Command4 Click（　） 　　　　Dim a As Integer，b As Integer 　　　　a=1 　　　　b=2 　　　　Print N(a，b) 　　End Sub 　　Function N(x As Integer，y As Integer)As Integer 　　　　N=IIf(x＞y，x，y) 　　End Function 　　程序运行后，单击命令按钮，输出结果为（ ）。
A. l
B. 2
C. 5
D. 8

[单项选择]在窗体上画一个命令按钮，然后编写如下程序。运行后，单击命令按钮，输出结果为 ( )。 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

[单项选择]在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl Click（　） Dim a（　） a=Array(1,3,5,7) s=0 For i=1 To 3 S=S*10+a(i) Next i Print s End Sub 程序运行后，输出结果为( )。
A. 135
B. 357
C. 531
D. 753

[单项选择]在窗体上画一个命令按钮，然后编写下列程序： 　　Private Sub Command1 click( ) 　　　　Dim a As Single，b As Single 　　　　a=6:b=2 　　　　RC a，b 　　　　Print a，b 　　End Sub 　　Sub RC(x As Single，y As Single) 　　　　i=x 　　　　x=i/y 　　　　y=i Mod y 　　End Sub 程序运行后，输出的结果为( )。
A. 如果选项组结合到某个字段，则只有组框架本身结合到该字段，而不是组框架的复选框、选项按钮或切换按钮
B. 选项组可以设置为表达式或非结合选项组，也可以在自定义对话框中使用非结合选项组来接受用户的输入，但不能根 据输入的内容来执行相应的操作
C. 选项组是由一个组框、一个复选框、选项按钮或切换按钮和关闭按钮组成的
D. 以上说法均错