在窗体上添加一个文本框Text1,然后编写下列Load事件过程,则程序运行结果是()。Private Sub Form_L

20 查阅

在窗体上添加一个文本框Text1,然后编写下列Load事件过程,则程序运行结果是( )。

Private Sub Form_Load()

Text1.Text=""

Text1.SetFocus

For k=1 To 5

t=t*k

Next k

Text1.Text=t

End Sub

A.在文本框中显示120

B.文本框中仍为空

C.在文本框中显示1

D.出错

参考答案:

D解析:本题中“Text1.SetFocus”语句运行时会出现错误。因为焦点只能移到可视的窗体或控件,而在窗体的Load事件完成前窗体或窗体上的控件是不可视的,所以编译出错。如果不是在Form_Load事件过程完成之前首先使用Show方法显示窗体的话,是不能使用SetFocus方法将焦点移至正在自己的Load事件中加载的窗体的。

计算机二级