UC知道关于VB程序问题，谢谢
来源：百度知道 编辑：UC知道 时间：2024/06/04 03:59:00
Private Sub Form_Load()
Dim i As Integer
Text1.Text = ""
Text1.SetFocus
For i = 1 To 10
Sum = Sum + i
Next i
Text1.Text = Sum
End Sub
上面这个程序有什么错误吗？
为什么会出现这种错误啊？
谢谢……
Dim i As Integer
Text1.Text = ""
Text1.SetFocus
For i = 1 To 10
Sum = Sum + i
Next i
Text1.Text = Sum
End Sub
上面这个程序有什么错误吗？
为什么会出现这种错误啊？
谢谢……
Sum没有设置变量
Private Sub Form_Load()
Dim i As Integer
Dim Sum
Text1.Text = ""
Text1.SetFocus
For i = 1 To 10
Sum = Sum + i
Next i
Text1.Text = Sum
End Sub
Text1.SetFocus 不能在Form_Load,具体为什么我不知到，但有一种方法能达到一样的效果：Text1.TabIndex = 0
去掉 Text1.SetFocus 就可以了