更多"当发生窗体的单击事件时,输出的第二行为( )。 Private S"的相关试题:
[单项选择]执行下列程序后,鼠标单击窗体,输出结果为( )。
Private Sub Form_Click( )
Print "Click";
End Sub
Private Sub Form_MouseDown(Button As Integer, Shift
A. End Sub DownUpClick
B. ClickDownUp
C. DownClickUp
D. UpDownClick
[填空题]某个窗体己编写以下事件过程。打开窗体运行后,单击窗体,消息框的输出结果为
Private Sub Form_Click( )
a=1
i=1
Do Until i>10
a=a+2
i=i+3
Loop
MsgBox a
End Sub
[单项选择]执行下列程序后,鼠标单击窗体,输出结果为______。
Private Sub Form_Click( )
Print"Click":
End Sub
Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)
Print"Down"
End Sub
Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single)
Print "Up"
End Sub
A. DownUpClick
B. ClickDownUp
C. DownClickUp
D. UpDownClick
[单项选择]设有如下窗体单击事件过程:
Private Sub Form_Click( )
a=1
For i=1 To 3
Select Case i
Case 1,3
a=a+1
Case 2,4
a=a+2
End Select
Next i
MsgBox a
End Sub
打开窗体运行后,单击窗体,则消息框的输出的结果是( )。
A. 3
B. 4
C. 5
D. 6
[单项选择]
设有如下窗体单击事件过程:
Private Sub Form _Click( )
a=1
For i=1 To 3
Select Case i
Case 1,3
a=a+1
Case 2, 4
a=a+2
End Select
Next i
MsgBox a
End Sub
打开窗体运行后,单击窗体,则消息框的输出的结果是()。
A. 3
B. 4
C. 5
D. 6
[单项选择]执行下面的程序,单击命令按钮后,窗体中的输出结果是 ______。
Private Sub Cotomand1_Click( )
Ch$="Welcome Home!"
a=Len(ch$)
For i= 1 To a
b$ = Mid(ch$, i 1)
If b$ = "m" Then m = m + 1
Next 1
Print m
End Sub
A. 2
B. 3
C. 1
D. 0
[单项选择]执行以下程序,在窗体上输出( )。
Private Sub Command1_Click( )
Dim a(20)
For j=1 To 20 Step 2
a(j)=j
Next j
Print a(1)+a(2)+a(3)
End Sub
A. 4
B. 5
C. 6
D. 7
[单项选择]下列程序段运行后窗体上输出结果为( )。
Private Sub Command1_Click( )
a=5: b=4: c=3: d=2
x=3>2*b Or a=c And b<>c Or c>d
Print x
End Sub
A. 1
B. True
C. False
D. 2
[单项选择]执行以下程序后,在窗体上输出的是( )。
Private Sub Command1_Click( )
Dim a(20)
For j=1 To 20 Step 2
a(j)=j
Next j
Print a(1)+a(2)+a(3)
End Sub
A. 4
B. 5
C. 6
D. 7
[单项选择]窗体Form1上有一个名称为Command1的命令按钮,以下对应窗体单击事件的事件过程是( )。
A. Private Sub Form 1_Click()
B. Private Sub Form_Click()
C. Private Sub Command1_Click()
D. Private Sub Command1_Click()
[单项选择]单击窗体上Com mand l命令按钮时,执行如下事件过程:
Private Sub Commandl_C1ick( )
a$="software and hardware"
b$=Right(a$,8)
C$=Mid(b$,1,8)
Msgbox c$
End sub
则在弹出的信息框的标题栏中显示的信息是( )。
A. software and hard WaJe
B. software
C. hardware
D. and
[单项选择]单击窗体上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
[单项选择]单击窗体时,下列程序段的执行结果为( )。
Private Sub Form_Crick( )
Line(200,200)-(400,400)
Print"+++++++++++++++++++"
Print"*******************"
End Sub
A. 在窗体上画一斜线,从斜线终点处开始打印两行符号
B. 在窗体上画一斜线,从斜线起点处开始打印两行符号
C. 在窗体上画一斜线,从窗体左上角开始打印两行符号
D. 从窗体左上角开始打印两行符号,从符号结束处开始画一斜线
[单项选择]窗体上有一个命令按钮,命令按钮的单击事件过程如下:
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
[单项选择]下列程序运行时,两次单击窗体后,显示的结果是( )。
Private Sub Form_Click( )
Dim b As Integer
Static c As Integer
b=b+2
c=c+2
Print "b=";b;"c=";c
End Sub
A. b=2 c=2
B. b=2 c=2
C. b=2 c=2
D. b=2 c=2