关于vb的过程

来源:百度知道 编辑:UC知道 时间:2024/06/20 05:39:42
private sub form_load()
text1.text=""
text1.setfocus
for i=1 to 10
sum=sum+i
next i
text1.text=sum
end sub
这个代码运行为什么出错啊
为什么用两位的方法还是报错啊

Me.Show
Private Sub form_load()
Text1.Text = ""
Text1.SetFocus
For i = 1 To 10
Sum = Sum + i
Next i
Text1.Text = Sum
End Sub

Private Sub form_load()
Me.Show
Text1.Text = ""
Text1.SetFocus
For i = 1 To 10
Sum = Sum + i
Next i
Text1.Text = Sum
End Sub

这样才对~
窗体还没加载显示出来 你就Text1.SetFocus 来设置文本框焦点~当然是错误的

'The Messgae below is copyed from Msdn

关于Setfocus方法:
焦点只能移到可视的窗体或控件。因为在窗体的 Load 事件完成前窗体或窗体上的控件是不可视的,所以如果不是在 Form_Load 事件过程完成之前首先使用 Show 方法显示窗体的话,是不能使用 SetFocus 方法将焦点移至正在自己的 Load 事件中加载的窗体的。

因此你要先在代码的前面加一句:Me.show

如果要窗体装入时,焦点在Text1上
应将Text1的TabIndex设为0

在Load里 text1.setfocus 肯定要报错的