在表单FORM1中有一个文本框TEXT1，TEXT1的INIT事件代码如下：THIS.VALUE=0TEXT1的VALI

在窗体上画一个文本框(其中Name属性为Text1)，然后编写如下事件过程： Private Sub Form_ Load() Text1.Text=“” Text1.SetFocus For i=1 To 10 Sum=Sam+ i Next i Text1.Text=Sam End Sub上述程序的运行结果是______ 。

A．在文本框Text1中输出55

B．在文本框Text1中输出0

C．出错

D．在文本框Text1中输出不定值

（ 17 ）设窗体中有一个文本框 Text1 ，若在程序中执行了 Text1.SetFocus ，则触发

A ） Text1 的 SetFocus 事件

B ） Text1 的 GotFocus 事件

C ） Text1 的 LostFocus 事件

D ）窗体的 GotFocus 事件

（ 32 ）在窗体中有一个文本框 text1, 编写事件代码如下：

Private sub form_click()

X=val(inputbox( “ 输入 x 的值 ” ))

Y=1

If x<> then y=2

Text1.value=y

End sub

打开窗体运行后。在输入框中输入整数 12 ，文本框 text1 中输出的结果是

A ） 1

B ） 2

C ） 3

D ） 4

使用下图，表单名为Form1，表单中有两个命令按钮(Commandl和Command2)、两个标签、两个文本框(Text1和Text2)。

如果在运行表单时，要使表单的标题显示“登录窗口”，则可以在Form1的Load事件中加入语句

A．THISFORM．CAPTION=“登录窗口”

B．FORM1．CAPTION=“登录窗口”

C．THISFORM．NAME=“登录窗口”

D．FORM1．NAME=“登录窗口”

在窗体上画一个文本框(其NAME属性为TExT1)，然后编写如下事件过程： PRIVATE SUB FORM_LOAD( ) DIM SUM TEXT1="" FOR I=1 TO 10 SUM=SUM+I NEXT I TEXT1=SUM END SUB上述程序的运行结果是( )。

A．在文本框TEXT1中输出55

B．在文本框TEXT1中输出0

C．出错

D．在文本框TEXT1中输出不定值

在表单中有命令按钮Commandl和文本框Text1，将文本框的InputMask属性值设置为$9,999.9，然后在命令按钮的Click事件中输入代码ThisForm.Text1.Value=123456.789，当运行表单时，单击命令按钮，此时文本框中显示的内容为______。

A．$123456.789

B．$23456.7

C．123456.7

D．**，***．*

在名为“Form1”的窗体上添加3个文本框和一个命令按钮，其名称分别为“Text1”、“Text2”、“Text3”和“Command1”，然后编写如下两个事件过程：

Private Sub Commandl Click()

Text3=Text1+Text2

End Sub

Private Sub Form1 Load()

Text1=" "

Text2=" "

Text3=" "

End Sub

打开窗体Form1后，在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7，然后单击命令按钮Command1，则文本框(Text3)中显示的内容为【 】。

在窗体上画一个文本框(其Name属性为Text1)，然后编写如下事件过程：

Private Sub Form_Load()

Text1.Text=""

Text1.SetFocus

For i=1 To 9

Sum=Sum=i

Next i

Text1.Text=Sum

End Sub

上述程序的运行结果是

A．在文本框Text1中输出45

B．在文本框Text1中输出0

C． 出错

D． 在文本框Text1中输出不定值

窗体上有一个文本框，其Name属性为Text1，如图1所示，并有如下事件过程：上述程序的运行结果是（ ）。

A. 在文本框Text1中输出55

B. 在文本框Text1中输出0

C. 语法错误

D. 在文本框Text1中输出不定值

窗体中有一个名为Command1的命令按钮和一个名为Text1的文本框，事件代码如下： Private Sub Command1_Click Dim a(10)As Integer，b(10)As Integer n=3 For i=1 T0 5 a(i)=i b(n)=2*n+i Next i Me!Text1=a(n)+b(n) End Sub 打开窗体，单击命令按钮，文本框Text1中显示的内容是（ ）。

A.13

B.14

C.15

D.16