问题
单项选择题
在窗体上画一个文本框(其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中输出不定值
答案
参考答案:C
解析: 由于Form_load事件是在窗体加载时发生,所以此时窗体还没有显示,不能用“Text1.SetFocus”语句获得焦点,故出错。如要改正,需要在此语句前加入“Me.Show”,显示窗体,则可以看到文本框已获得焦点,并执行循环语句,输出“45”。