UC知道VB这段代码运行结果出错，请问为什么
来源：百度知道 编辑：UC知道 时间：2024/05/31 07:31:25
Private Sub Form_Load()
Text1.Text = ""
Text1.SetFocus
For i = 1 To 100
Sum = Sum + i
Next i
Text1.Text = Sum
End Sub
我想知道的是为什么我这段代码是错误的，不是想要正确代码，我现在是知其然，但不知其所以然。拜托各位帮我分析一下我这段代码错在哪里，谢谢~
Text1.Text = ""
Text1.SetFocus
For i = 1 To 100
Sum = Sum + i
Next i
Text1.Text = Sum
End Sub
我想知道的是为什么我这段代码是错误的，不是想要正确代码，我现在是知其然，但不知其所以然。拜托各位帮我分析一下我这段代码错在哪里，谢谢~
楼上的这两位说的都没错,去掉Text1.SetFocus 或者 加上form1.show都是可以执行的,因为你的事件是写在Form_Load() 里,就是窗口还处在正在load过程中,form1还没有显示,text1文本框还不存在,是不可以使用setfocus转移焦点给它的,每个窗口默认的是先load再显示窗口,而使用form1.show后的处理就是直接显示,所以可以使用setfoucus了
Private Sub Form_Load()
Text1.Text = ""
For i = 1 To 100
Sum = Sum + i
Next i
Text1.Text = Sum
End Sub
Private Sub Form_Load()
form1.show
Text1.Text = ""
Text1.SetFocus
For i = 1 To 100
Sum = Sum + i
Next i
Text1.Text = Sum
End Sub