更多"窗体上有3个按钮Commandl、Command2和Command3,"的相关试题:
[单项选择]窗体上有3个按钮Commandl、Command2和Command3,如以下代码:
Private Sub Commandl Click( )
Command2.Enabled:Fal3e
Command3.Vi3ible=Fal3e
End Sub
该程序的功能是 ( )
A. 当单击按钮Command1时, Command2和Command3按钮不可用
B. 当单击按钮Command1时, Command2和Command3按钮不可见
C. 当单击按钮Command1时, Cammand2按钮不可用和Command3按钮不可见
D. 当单击按钮Command1时, Command2按钮不可见和Command3按钮不可用
[单项选择]窗体中有3个命令按钮,分别命名为Command1、Command2和Command3。单击Command1按钮时,Command2按钮变为可用,Command3按钮变为不可见。在下列Command1的单击事件过程中,正确的是( )。
A. private sub Command1_Click()
B. private sub Command1_Click()
C. private sub Command1_Click()
D. private sub Command1_Click()
[单项选择]窗体上添加有3个命令按钮,分别命名为Command1、Command2和Command3,编写Command1的单击事件过程,完成的功能为:当单击按钮Command1时,按钮Command2可用,按钮Command3不可见。以下正确的是( )。
A. Private Sub Command1 Click()
B. Private Sub Command1 Click()
C. Private Sub Command1_Click()
D. Private Sub Command1_C1ick()
[单项选择]窗体上有一个名为Command1的命令按钮,并有如下程序:
Private Sub Command1_Click( )
Dim a(10) ,x%
For k=1 To 10
a(K)=Int(Rnd*90+10)
x=x+a(k) Mod 2
Next k
Print x
End Sub
程序运行后,单击命令按钮,输出结果是______。
A. 10个数中偶数的个数
B. 10个数中奇数的个数
C. 10个数中偶数的累加和
D. 10个数中奇数的累加和
[单项选择]窗体上有一个名为Command1的命令按钮,并有下面的程序:
Private Sub Command1_Click( )
Dim arr(6) As Integer
For k=1 To 6
arr(k)=k
Next k
prog arr( )
For k=1 To 6
Print arr(k);
Next k
End Sub
Sub prog(a( )As Integer)
n=UBound(a)
For i=n To 2 Step-1
For j=1 To n-1
If a(j)<a(j+1)Then
t=a(j):a(j)=a(j+1):a(j+1)=t
End If
Next j
Next i
End Sub
程序运行时,单击命令按钮后显示的是______。
A. 0 1 2 3 4 5
B. 1 2 3 4 5 6
C. 5 4 3 2 1 0
D. 6 5 4 3 2 1
[单项选择]在窗体上有一个名称为Command1的命令按钮,并有如下程序:
Private Sub Command1_Click( )
Static X As Integer
Static Y As Integer
Cls
Y=1:Y=Y+5:X=5+X:Print X,Y
End Sub
程序执行时,单击命令按钮Command1三次后,窗体上显示的结果为( )。
A. 15 16
B. 5 6
C. 15 15
D. 15 6
[单项选择]
窗体上有一个名为Command1的命令按钮,并有如下程序:
Private Sub Command1_Click( )
Dim a(10), x%
For k=1 To 10
a(k)=Int(Rnd*90+10)
x=x+a(k)Mod 2
Next k
Print x
End Sub
程序运行后,单击命令按钮,输出结果是()。
A. 10个数中奇数的个数
B. 10个数中偶数的个数
C. 10个数中奇数的累加和
D. 10个数中偶数的累加和
[单项选择]窗体上有一个Text1文本框,一个Command1命令按钮,并有以下程序:
Private Sub Command1_Click( )
Dim n
If Text1.Text<>"123456"Then
n=n+1
Print"口令输入错误" & n & "次"
End If
End Sub
希望程序运行时得到左图所示的效果,即:输入口令,单击“确定口令”命令按钮,若输入的口令不是“123456”,则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是右图所示的效果,程序需要修改。下面修改方案中正确的是( )
A. 在Dim n语句的下面添加一句:n=0
B. 把Print"口令输入错误"&n&"次"改为Print"口令输入错误"+n+"次"
C. 把Print"口令输入错误"&n&"次"改为Print"口令输入错误"&Str(n)&"次"
D. 把Dim n改为Static n