Click the Print button to print the workbook.（)

编写了如下事件过程： 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．按什么键都不显示

● If you decide you don′t want to print the message, Click （72） .

（72）

A. Cancel B. OK

C. File

D. Edit

A. Click Start, select run and type Services.msc

B. Click Start, select run and type gpedit.msc

C. Click Start, select run and type regedit

D. Click Start, Settings, Printers and Faxes

请阅读程序： Private Sub Form. Click（） m=1 For i=4To 1 Step-1 Print Str(m)；

m=m+1 For j=1 To i Print"*"： Next j Print Next i End Sub 程序运行后，单击窗体，则输出结果是（）。

A.1**** 2*** 3** 4*

B.4**** 3*** 2** 1*

C.**** *** ** *

D.* ** *** ****

A.Click

B.Command1_Click()

C.EndSub

D.Command1

执行下列程序后，鼠标单击窗体，输出结果为 。

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

A.Load

B.Click

C.Move

D.Print

执行下列程序后，鼠标单击窗体，输出结果为 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．CfickDownUp

C．DownClickUp

D．UpDownClick

运行下面程序后，正确的输出结果是 ______。Private Sub Command1_ Click() x = 6 if x ＞6 then Print "x＞6": Else if x ＜8 then Print "x＜8"; Else if x = 6 then Print "x=6": End if End if End ifEnd Sub

A．x＜8 x=6

B．x＜8

C．x=6

D．x＜8或x=6

请阅读程序：

Private Sub Form. Click（）

m=1

For i=4To 1 Step-1

Print Str(m)；

m=m+1

For j=1 To i

Print"*"：

Next j

Print

Next i

End Sub

程序运行后，单击窗体，则输出结果是（）。

A.1****

2***

3**

4*

B.4****

3***

2**

1*

C.****

***

**

*

D.*

**

***

****