Run-time error'424'Object required

提问：Run-time error'424'Object required

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保留字，不能用作变量名的。

转贴于：立珊网络计算机专业网站