更多"对窗体编写如下事件过程： Private Sub Form _ Mo"的相关试题:
[单项选择]对窗体编写如下事件过程：
Private Sub Form _ MouseDown(BuRon As Integer，Shift As Integer, X As Single，
Y As Single)
If Button=2 Then
Print "AAAAA"
End If
End Sub
Private Sub Form_MouseUp(Button As Integer，Shift As Integer，X As Single，
Y As Single)
Print "BBBBB"
End Sub
程序运行后，如果单击鼠标右键，则输出结果为 ______。
A. AAAAA
B. BBBBB
C. AAAAA
D. BBBBB
[单项选择]对窗体编写如下事件过程： Private Sub Form_ MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single) If Button =2 Then Print “AAAAA” End If End Sub Private Sub Form_ MouseUp (Button As Integer，Shift As Integer，X As Single，Y As Single) Print “BBBBB” End Sub 程序运行后，如果单击鼠标右键，则输出结果为______ 。
A. AAAAA BBBBB
B. BBBBB
C. AAAAA
D. BBBBB AAAAA
[单项选择]对窗体编写如下事件过程：
Private Sub Form_MouseDown(Button As Integer，Shift As Integer,X As Single，
Y As Single)
If Button=2 Then
Print "AAAAA"
End If
End Sub
Private Sub Form_MouseUp(Button As Integer，Shift As Integer，X As Single，
Y As Single)
Print "BBBBB"
End Sub
程序运行后，如果单击鼠标右键，则输出结果为 ______ 。
A. AAAAA
B. BBBBB
C. AAAAA
D. BBBBBAAAAA
[单项选择]编写如下事件过程: Private Sub Form_ MouseDown (Button As Integer, Shift As Integer, X As Single, Y As Single) If Shift = 6 And Button = 2 Then Print “Hello” End If End Sub 程序运行后，为了在窗体上输出“Hello”，应在窗体上执行以下______ 操作。
A. 同时按下Shift键和鼠标左按钮．
B. 同时按下Shift键和鼠标右按钮
C. 同时按下Ctrl、Alt键和鼠标左按钮
D. 同时按下Ctrl、Alt键和鼠标右按钮
[单项选择]编写如下事件过程：
Private Sub Form MouseDown(Button As Integer，Shift As Integer，X As Single， Y As Single)
If Shift=6 And Button=2 Then
Print "BBBB"
End If
End Sub
程序运行后，为了在窗体上输出“BBBB”，应执行的操作为
A. 同时按下Shift键和鼠标左键
B. 同时按下Ctrl、Alt键和鼠标右键
C. 同时按下Shift键和鼠标右键
D. 同时按下Ctrl、Alt键和鼠标左键
[单项选择]编写如下事件过程： Private Sub FOrm_ MouseDown (Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then Pint "AAAA" Then End If End Sub Private Sub Form_ MouseUp (Button As Integer, _ Shift As Integer, X As Single, Y As Single) Print "BBBB" End Sub程序运行后，如果在窗体上单击鼠标右键，则输出结果为______ 。
A. AAAA BBBB
B. BBBB
C. AAAA
D. BBBB AAAA
[单项选择]对窗体编写如下代码： Option Base 1 Private Sub Form_ KeyPress (KeyAscii As Integer) a=Array(237，126，87，48，498) m1=a(1) m2=1 If KeyAscii=13 Then For i=2 To 5 If a(i)＞m1 Then m1=a(I) m2=i End If Next i End If Print m1 Print m2 End Sub 程序运行后，按回车键，输出结果为______ 。
A. 48 4
B. 237 1
C. 498 5
D. 498 4
[单项选择]对窗体编写如下事件过程：
Option Base 1
Private Sub Form_KeyPress (KeyAScii AS Integer)
arr=Array(12，15，18，20，24)
m1=arr(1)
m2=1
If fKeyAscii=12 Then
For i=2 To 5
If arr(i)＞m1 Then
m1=arr(i)
m2=i
End If
Next i
End If
Print m1
Print m2
End Sub
程序运行之后按回车键，输出结果为( )。
