更多"在窗件上画一个名称为Command1的命令按钮,然后编写如下事件过程:"的相关试题:
[单项选择]在窗件上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) Move 500, 500 End Sub 程序运行后,单击命令按钮,执行的操作为______。
A. 命令按钮移动到距窗体左边界、上边界各500的位置
B. 窗体移动到距屏幕左边界、上边界各500的位置
C. 命令按钮向左、上方向各移动500
D. 窗体向左、上方向各移动500
[单项选择]在窗件上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click( ) a=12345 Print Format S(a, "000. 00") End Sub 程序运行后,单击命令按钮,窗体上显示的是______。
A. 123.45
B. 12345.00
C. 12345
D. 00123.45
[单项选择]在窗体上画一个名为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 x As Integer,y As Integer x=10:y:0 Do x=x+2:y=y+x Print "x=", x; "y=",y If y>20 Then Exit Do Loop Until x=18 End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是 ______。
A. x=12y=12 x = 14 y = 16 x=16 y=18
B. x=12 y=12 x= 16 y =28 x= 18 y=24
C. x=12 y=12 x= 14 y=44
D. x= 12 y=12 x= 14 y=26
[单项选择]
在窗体上画一个名为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 Arr1(10) As Integer, Arr2(10)As Integer n=3 For i = 1 To 5 Arr1 (i)=i Arr2(n)=2 * n+i Next i Print Arr2(n); Art1 (n)End Sub运行程序后,单击命令按钮,输出结果是( )。
A. 11 3
B. 3 11
C. 13 3
D. 3 13
[单项选择]在窗体上画一个命令按钮,名称为Command1。然后编写如下程序: Private Sub Command1_Click( ) Dim j As Integer,s As Integer s=1 Do s=s+j j=j+1 Loop Until j>=5 Print s End Sub 程序运行后,单击命令按钮,在窗体上输出的结果是( )。
A. 11
B. 1
C. 16
D. 7
[单项选择]在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Private Sub Command1_Click( ) Dim x As Integer Static y As Integer Cls x=x+5 y=y+3 Print x,y End Sub 程序运行时,两次单击命令按钮Command1后,窗体显示的结果是( )。
A. 10 6
B. 5 6
C. 5 3
D. 10 3
[单项选择]在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command 1_ Click( ) Static y As Integer CIs For i=0 To 2 x=x +y y=y +3 Next Print x, yEnd Sub程序运行后,连续二次单击Command1按钮后,窗体上显示的是______。
A. 9 9
B. 36 18
C. 30 12
D. 63 27
[单项选择]
在窗体上画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 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. 4 3
B. 1 1
C. 3 0
D. 2 6