UC知道1道简单VB题目
来源：百度知道 编辑：UC知道 时间：2024/05/16 02:35:35
Private Sub Form_Load()
Text1.Text = ""
Text1.SetFocus
For i = 1 To 9
Sum = Sum + i
Next i
Text1.Text = Sum
End Sub
中为什么会出错误,是setfocus那!
Text1.Text = ""
Text1.SetFocus
For i = 1 To 9
Sum = Sum + i
Next i
Text1.Text = Sum
End Sub
中为什么会出错误,是setfocus那!
form_load的时候，不能加Text1.SetFocus
这个代码，因为form_load的时候窗体都没画好，怎么SetFocus ？
你可以在前面加一句
me.show
me.refresh
文本是空的，setfocus当然不可以
可以加入容错代码
On Error Resume Next