更多"在窗体上画一个命令按钮,然后编写如下代码: Private Sub "的相关试题:
[单项选择]在窗体上画一个命令按钮,然后编写如下程序
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 Commandl Click( )
Dim a( )
a=Array(1,3,5,7)
s=O
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. 以上说法均错
[单项选择]在窗体上画一个命令按钮,然后编写如下程序:
Private Sub Commandl_Click( )
Dim a AS Integer,b As Integer
a=15
b=2
t N(a,b)
End Sub
Function N(x As Integer,y As Integer) As Integer
N=IIf(x)y,x,y)
End Function
程序运行后,单击命令按钮,输出结果为( )。
A. 20
B. 261
C. 15
D. 25
[单项选择]在窗体上画一个命令按钮,然后编写如下事件过程: 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( )
a&=InputBox("请输入第一个数")
b&=InputBox("请输入第二个数")
Print b&+a&
End Sub
程序运行后,单击命令按钮,在两个输入对话框中先后输入12345和54321,程序的输出结果是
A. 66666
B. 5432112345
C. 1234554321
D. 出错
[单项选择]在窗体上画一个命令按钮,然后编写下列程序:
Private Sub Command3_Click( )
Tcl 2
Tcl 3
Tel 4
End Sub
Sub Tcl(a As Integer)
Static x As Integer
x=x + a
Print x;
End Sub
程序运行后,单击命令按钮,输出结果为( )。
A. ResultSet
B. Connection
C. Statement
D. 以上都不是
[单项选择]在窗体上画一个命令按钮,然后编写下列程序: Private Sub Command12_Click( ) Tt 3 End Sub Sub Tt(a As Integer) Static X As Integer X=X * a + 1 Print x; End Sub 连续三次单击命令按钮,输出的结果是
A. 1 5 8
B. 1 4 13
C. 3 7 4
D. 2 4 8
[单项选择]在窗体上画一个命令按钮,然后编写如下程序:
Private Sub Comrnand3_Click( )
Cop 2
Cop 3
Cop 4
End Sub
Sub Cop (a As Integer)
Static x As Integer
x=x + a
Print x;
End Sub
程序运行后,单击命令按钮,输出结果为( )。
A. 2 3 4
B. 2 5 9
C. 3 5 4
D. 2 4 3
[单项选择]在窗体上画一个命令按钮,然后编写如下事件过程:
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