设有如下程序：程序运行后单击窗体，则在窗体上显示为（）

A.40

B.10

C.12

D.16

A.0

B.5

C.6

D.7

A.bcai

B.cbia

C.bcais

D.cbias

A.12345

B.678910

C.23456

D.62345

A.BBCCCDDDDEEEEE

B.ABBCCCDDDD

C.BCCDDDEEEE

D.AABBBCCCCDDDDD

A.-5

B.25

C.-1

D.1

A.程序运行错

B.在窗体上显示“考核通过!”

C.在窗体上显示“考核不通过!”

D.在窗体上显示“输入数据不合法!”

程序为：

Private Sub Form_Click()

Dim a

a = Array(1, 2, 3, 4, 5, 6, 7)

For I = LBound(a) To UBound(a)

a(I) = a(I) * a(I)

Print a(I)

Next I

End Sub

程序运行后，单击窗体后，在窗体显示的结果是：

A.MouseDown

B.Load

C.MouseUp

D.Click

在窗体上画一个文本框，然后编写如下事件过程：

Private Sub Form_Click()

Dim x As Integer

x = Val(InputBox("请输入一个整数"))

Print x + Text1.Text

End Sub

程序运行时，在文本框中输入12，然后单击窗体，在输入对话框中输入34，单击"确定"按钮后，在窗体上显示的内容为______。

A.46

B.123

C.3412

D.1234