UC知道用VB编程完用时出现Run-time error'424'Object required,
来源：百度知道 编辑：UC知道 时间：2024/06/14 02:02:54
我的目的是做QQ炸弹从,它的代码是
Private Sub From_Load()
Texr1.Text= "☆ヾ深爱Ta"
Texr2.Text= 1000
End Sub
Private Sub Timer1_Timer()
Dim str As string
str = Texr1.Text
sendkeys str
sendkeys"%s"
End Sub
Private Sub command1_Click()
Timer1.interval = Texr2.Text
Timer1_Timer
End Sub
Private Sub command2_Click()
Timer1.interval = 0
End Sub
Private Sub command3_Click()
End
End Sub
帮我找下原因,谢谢前辈!
请大家帮我补充一下．我应该怎么做，我可以用这个程序／
Private Sub From_Load()
Texr1.Text= "☆ヾ深爱Ta"
Texr2.Text= 1000
End Sub
Private Sub Timer1_Timer()
Dim str As string
str = Texr1.Text
sendkeys str
sendkeys"%s"
End Sub
Private Sub command1_Click()
Timer1.interval = Texr2.Text
Timer1_Timer
End Sub
Private Sub command2_Click()
Timer1.interval = 0
End Sub
Private Sub command3_Click()
End
End Sub
帮我找下原因,谢谢前辈!
请大家帮我补充一下．我应该怎么做，我可以用这个程序／
你的文本框的名字是Texr1和Texr2吗？估计不是。是你写错了。Dim str As string 也不对，STR是VB保留字，不能用作变量名的。
检查文本框(textbox）是否存在，名字是否正确。
检查定时器(timer)是否存在，名字是否正确。
看不懂