假定编写了如下事件过程：

Private Sub Form. MouseMove(Button As Integer,

Shift As Integer, X As Single, Y As Single)

If (Button And 3) = 3

Print "AAAA"

E．nd If

E．nd Sub

程序运行后，为了在窗体上输出AAAA，应执行的操作是______。

[单选题]假定编写了如下事件过程： Private Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single， Y As Single) If Button=2 Then Print "aaaa" End If End Sub 程序运行后，为了在窗体上输出“AAAA”，应按下的鼠标键为A．左键B．右键C．同时按下左、右键D．按什么键都不显示

[单选题]编写如下事件过程： Private Sub Form_MouseMove(ButtonAsInteger,ShiftAsInteger，X As Single,YAsSingle) Cls If(Button Andl)ThenPrint"你好" End Sub 程序运行后，为了在窗体上显示“你好”，应在窗体上执行以下( )操作。A．只能按下左按键并拖动B．只能按下右按键并拖动C．只能按下左按键D．只能按下右按键

[单选题]编写了如下事件过程： Private Sub Form_MouseDown(KeyCode As Integer,Shift As Integer) If (Button And 3)=3 Then Print"AAAA" End If End Sub 程序运行后，为了在窗体上输出“AAAA”，应按下的鼠标键是A．左B．右C．同时按下左和右D．按什么键都不显示

[单选题]编写了如下事件过程： Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer) If(Button And 3)=3 Then Print "AAAA" End If End Sub 程序运行后，为了在窗体上输出"AAAA"，应按下的鼠标键是A．左B．右C．同时按下左和右D．按鼠标键没有反应

[单选题]假定编写如下事件过程： Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single，Y As Single) If(Button and 3)=3 then Print"Hello" End if End Sub 程序运行后，为了在窗体上输出“Hello”，应该窗体上执行以下( )操作。A．只能按下左键并拖动B．只能按下右键并拖动C．必须同时按下左、右键并拖动D．按下左键拖动或按下右键拖动

[单选题]编写如下事件过程： 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．同时按下Shift键和鼠标右键C．同时按下Ctrl、Alt键和鼠标左键D．

[单选题]编写如下事件过程： Private Sub Form. KeyDown(KeyCode As Integer，Shift As Integer) If(Button And 3)=3 Then Print "AAAA" End If End Sub 程序运行后，为了在窗体上输出"AAAA"，应按下的鼠标键为 ______。A．左B．右C．同时按下左、右D．按什么键都不显示

[单选题]编写如下事件过程： Private Sub Form. KeyDown (KeyCode As Integer, Shift As Integer) Print Chr (KeyCode) End Sub Private Sub Form_KeyPress( KeyAscii As Integer) Print Chr(KeyAscii) End Sub 在一般情况下(即不按住Shift键和锁定大写键时)运行程序，若按“T”键，则程序输出的结果是A．T TB．t TC．T tD．t t

[单选题]对窗体编写如下事件过程： 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 "BBBB

[单选题]编写如下事件过程： Private Sub Form. Click() Dim Char As String，i As Integer Const ch$="#" msg$= "Enter a String：" char=InputBox$(msg$) n=Len(Char) For i=1 To n If Mid$(char，i，1)=ch$ Then Exit For End If Next i Print i - 1 End Sub 其中InputBox函数的功能是弹出一个输入对话