更多"在窗体上有一个名称为Command1的命令按钮,并编写有如下事件过程:"的相关试题:
[单项选择]
窗体上有一个名为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个数中偶数的累加和
[单项选择]窗体上有一个命令按钮,命令按钮的单击事件过程如下:
Private Sub Command1_Click( )
Dim a
a=Array(1,2,3,4,5)
For k=1 To 4
s=s+a(k)
Next
Print S
End Sub
运行程序后,单击命令按钮,输出结果是
A. 10
B. 14
C. 15
D. 120
[单项选择]单击窗体上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( )
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( )
Static b As Variant
b=Array(1,3,5,7,9)
End Sub
此过程的功能是把数组b中的5个数逆序存放(即排列为9,7,5,3,1)。为实现此功能,省略号处的程序段应该是( )。
A. For i=0 To 5-1/2
B. For i=0 To 5
C. For i=0 To 5/2
D. For i=1 To 5/2
[单项选择]
窗体上有一个名称为Command1的命令按钮,其中部分代码如下:
Private Sub Command1_Click( )
Dim a(10) As Integer
Dim n As Integer
……
Call calc(a,n)
……
End Sub
calc过程的的首行应该是()。
A. Sub calc(x() As Integer,n As Integer)
B. Public Sub calc(x() As Integer)
C. Private Sub calc(a(n) As Integer,n As Integer)
D. Public Sub calc(a As Integer, n As Integer)
[单项选择]在窗体上画一个名为Command1的命令按钮,然后编写以下程序:
Private Sub Command1_Click( )
Dim M(10) As Integer
For k=1 To 10
M(k)=12-k
Next k
x=8
Print M(2+M(x))
End Sub
运行程序,单击命令按钮,在窗体上显示的是
A. 6
B. 5
C. 7
D. 8
[单项选择]
窗体上有一个名称为Command1的命令按钮,其单击事件过程代码如下:
Private Sub Command1_Click( )
Static x As Variant
n=0
x=array(1,2,3,4,5,6,7,8,9,10)
While n<=4
x(n)=x/(n+5)
Print x(n);
N=n+1
Wend
End Sub
运行程序,单击命令按钮Command1,窗体上显示的是()。
A. 1 2 3 4 5
B. 6 7 8 9 10
C. 2 3 4 5 6
D. 6 2 3 4 5
[单项选择]在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_ Click ( )
x = InputBox("Enter the First integer")
y = InputBox("Enter the Second integer")
Print y +x
End Sub
程序运行后,单击命令按钮,先后在两个输入对话框中分别输入456和123,则输出结果是 ______。
A. 579
B. 123
C. 456
D. 123456
[单项选择]在窗体中添加一个命令按钮,并编写如下程序:
Private Sub Command1_ Click( )
x=1: y=2: z=3
x=y: y=z: z=x
End Sub
程序执行后,输出的结果是______。
A. 3
B. 0
C. 2
D. 1
[单项选择]在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click( )
x=0
Do Until x=-1
a=InputBox("请输入A的值")
a=Val(
A. 14
B. 15
[单项选择]在窗体中画一个命令按钮,然后编写以下事件过程:
Private Sub Command1_Click( )
For j=1 To 3
Print Tab(3(j);11((2(j-1);
Next j
Print
End Sub
程序的执行结果为
A. 11
B. 33
C. 11 33
D. 11 33 55