更多"执行下列程序后,鼠标单击窗体,输出结果为( )。
Priva"的相关试题:
[单项选择]执行下列程序后,鼠标单击窗体,输出结果为
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 "Donw"
End Sub
Private Sub Form_MouseUp(ButtonAs Integer,Shift As Integer,X As Single,Y As Single)
Print "Up"
End Sub
A. DownUpClick
B. ClickDownUp
C. DownClickUp
D. UpDownCliek
[单项选择]执行下列程序后,鼠标单击窗体,输出结果为( )。
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 “Donw”
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 Command1_Click( )
a=1 : b=4 : c = 9 : d = 5
If a < b Then
If c<d Then
x=True
Else
If a<c Then
x=False
Else
x=True
End If
End If
End If
Print Val(x)
End Sub
A. True
B. False
C. 0
D. 1
[填空题]窗体上有两个按钮,则执行程序后按键盘Cancel键的输出结果是 【7】 。
Private Sub Command1 _ Click( )
Print"北京";
End Sub
Private Sub Command2 _ Click( )
Print"南京";
End Sub
Private Sub Form _ Load( )
Command2.Cancel=True
Command1.Cancel=True
End Sub
[填空题]下面运行程序后,单击命令按钮,输出的结果是【 】。
Private Sub Command1_Click( )
Dim a%(1 To 4),b%(3 To 6),i%,s1#,s2#
For i=1 To 4
a(i) =i
Next i
For i=3 To 6
b(i) =i
Next i
s1=YAS(A)
s2=YAS(B)
Print"s1=";s1;"s2=";s2
End Sub
Function YAS(a( )As Integer)
Dim t#,i%
t=1
For i=LBound(A) To UBound(A)
t=t * a(i)
Next i
YAS=t
End Function