更多"执行下列程序后,鼠标单击窗体,输出结果为( )。
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. J2DE
B. J2SE
C. J2ME
D. Y2EE
[单项选择]执行下列程序后,鼠标单击窗体,输出结果为______。
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 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
[填空题]下面运行程序后,单击命令按钮,输出的结果是【 】。
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