有一个ylc5.vbp，只有一个窗体Form1，需要创建Form2。在窗体Form1上建立Command1和Command2两个命令

有一个工程文件ylc.vbp(相应的窗体文件名为ylc5.frm)，在窗体上画一个名为List1的列表框和一个名为Text1的文本框。编写窗体的MouseDown事件。程序运行后，如果用鼠标左键单击窗体，则从键盘上输入要添加到列表框的项目；如果用鼠标右键单击窗体，则从键盘上输入要删除的项目，将其从列表中删除。程序的运行情况如图23所示。注意：存盘时必须存放在考生文件夹下，工程文件名为ylc5.vbp，窗体文件名为ylc5.frm。

提供的函数过程如下：

Function Aver(arr()As Integer)As Double

Aver=arr (0)+arr(1)+arr(2)+arr(3)+arr(4)

End Function

注意：存盘时必须存放在考生文件夹下，工程文件名为ylc5.vbp，窗体丈件名为ylc5.frm。

有如下事件过程：

Private Sub Form. Click()

Dim n As Integer

x=0

n=InputBox(”请输入一个整数”)

For i=1 To i

For j=1 To i

x=x+1

Next j

Next 1

Print x

End sub

程序运行后，单击窗体，如果在输入对话框中输入5,则在窗体上显示的内容是()。

A．13

B．14

C．15

D．16

窗体Forml上有一个名称为Commandl的命令按钮，以下对应窗体单击事件的事件过程是

A．Private Sub Forml_Click() … End Sub

B．Private Sub Form_Click() … End Sub

C．Private Sub Commandl_Click() … End Sub

D．Private Sub Command_Click() … End Sub

在窗体上添加一个命令按钮(名为Command1)，然后编写如下事件过程： Private Sub Command1_Click() For i=l To 4 x=4 For j=1 To 3 x=3 Fork=1 To 2 x=x+6 Next k Next j Next i MsgBox x End Sub 打开窗体后，单击命令按钮，消息框的输出结果是()。

A．7

B．15

C．157

D．528

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For n=1 To 20 If n Mod 3＜＞Then m=m+n\3 Next n Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是 ______。

A．15

B．18

C．21

D．24

在窗体上添加一个命令按钮(名为Command1，然后编写如下事件过程： Private Sub Command1_Click() For i=1 To 4 x=4 For j=1 To 3 x=3 For k=1 To 2 x=x+6 Next k Next j Next i MsgBox x End Sub 打开窗体后，单击命令按钮，消息框的输出结果是______。

A．7

B． 15

C． 157

D． 538

在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Commandl Click() Forn=1 To 20 If n Mod 3＜＞Thenm=m+n\3 Next n Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是______。

A．15

B．18

C．21

D．24

在窗体上画一个命令按钮，名称为Command1。然后编写如下程序： Private Sub Command1_Click() For I=1 To 4 For J=0 To 1 Print Chr$(65+1)； Next J Print Next 1 End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是

A．BB CCC DDDD EEEEE

B．A BB CCC DDDD

C．B CC DDD EEEE

D．AA BBB CCCC DDDDD