有如下程序：Private Sub Form_Click（) Dim Check, Counter Check=True Counter=0 Do Do While Co

有如下事件过程：

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

设有如下程序：

Private Sub Form_Click()

Dim i As Integer，x As String,Y As String

x=”ABCDEFG”

For i=4 To 1 Step-1

y=Mid(x，i，i)+y

Next i

Print y

End Sub

程序运行后，单击窗体，输出结果为

A．ABCCDEDEFG

B．AABBCDEFG

C．ABCDEFG

D．AABBCCDDEEFFGG

在窗体上画—个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click_() For n=1 To 20 If n Mod 3＜＞0 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 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

在窗体上画一个名称为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

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

A．15

B．18

C．21

D．24

在窗体上添加一个文本框Text 1，然后编写如下的Load事件过程，则程序运行结果为()。 Private Sub Form_Load0 Text1. Text="" Text1. SetFocus For k = 1 To 5 t=t*k Next k Text1.Text = tEnd Sub

A．在文本框中显示120

B．文本框中仍为空

C．在文本框中显示1

D．出错

在窗体上画一个名称为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

A.37111519

B.19151173

C.13579

D.不确定的值

在窗体上添加一个命令按钮(名为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 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