更多"在窗体上画一个名称为C1的命令按钮,然后编写如下事件过程:
Pri"的相关试题:
[单项选择]在窗体上画一个名为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( )
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( )
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
[单项选择]在窗体上画一个名称为C1的命令按钮,然后编写如下事件过程: Private Sub C1 Click( ) a=0 n=InputBox(” ”) For i=l To n For j=1 To i a=a+1 Next j Next i Print a End Sub 程序运行后单击命令按钮,如果输入4,则在窗体上显示的内容是( )。
A. 5
B. 6
C. 9
D. 10
[单项选择]在窗体上画一个名称为C1的命令按钮,然后编写如下事件过程:
Private Sub C1_Click( )
a=0
n=Input Box("")
For i=1 To n
For j=1 To i
a=a+1
Next j
Next i
Print a
End Sub
程序运行后,单击命令按钮,如果输入4,则在窗体上显示的内容是( )。
A. 5
B. 6
C. 9
D. 10
[单项选择]在窗体上画尸-个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click( ) For i=1 to 4 If i=1 Then x=i If i<=4 Then x=x+1 Print x Next i End Sub 程序运行后,单击命令按钮,其输出结果为: ______。
A. 1 2 3 4
B. 2 3 4 5
C. 2 3 4 4
D. 3 4 5 6
[单项选择]在窗体上画一个命令按钮,然后编写如下程序
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
[单项选择]在窗体上画一个名称为Commandl命令按钮,然后编写如下事件过程: Private Sub Commandl_click( ) c="ABCD" For n=1 To 4 Print() Next End Sub 程序运行后,单击命令按钮,要求在窗体上显示如下内容 D CD BCD ABCD 则在()处填入的内容为。
A. Left(c,n)
B. Right(c,n)
C. Mid(c,n,1)
D. Mid(c,n,n)
[单项选择]
在窗体上画1个命令按钮,并编写如下事件过程:
Private Sub Command1_Click( )
Dim a(3,3)
For m=1 To 3
For n=1 To 3
If n=m Or n=4-m Then
a(m,n)=0
End If
Print a(m,n);
Next n
Print
Next m
End Sub
运行程序,单击命令按钮,窗体上显示的内容为()
A. 2 0 0 0 4 0 0 0 6
B. 2 0 4 0 4 0 4 0 6
C. 2 3 0 3 4 0 0 0 6
D. 2 0 0 0 4 5 0 5 6
[单项选择]在窗体上画1个命令按钮,并编写如下事件过程:
Private Sub Command1_Click( )
For i=5 to 1 step -0.8
Print Int(i);
Next i
End Sub
运行程序,单击命令按钮,窗体上显示的内容为
A. 5 4 3 2 1 1
B. 5 4 3 2 1
C. 4 3 2 1 1
D. 4 4 3 2 1 1
[单项选择]在窗体上画一个命令按钮,然后编写如下事件过程:
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 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