获得焦点的问题

Question

我想当Form1弹出时,里面的Text1获得焦点,
Private Sub Load()
Text1.SetFocus
End Sub
为什么会出错,该怎么做?

Answer 1

form在load时，窗体还没有显示出来，这个时候调用setfocus，就会出错

Answer 2

Private Sub Load()
me.show
Text1.SetFocus
End Sub

Answer 3

楼上的并不可以,需要放在窗体的Resize事件中
Private Sub Form_Resize()
Text1.SetFocus
End Sub

Answer 4

把text1的tabindex属性设置为0
楼上的方法也很巧妙。