Question

VB中， 对文本框回车之前执行click事件， 怎样写code？

想在点击此文本框时， timer1.Enable=False, 当输入完文本后， 按回车，则Timer1.Enable= True, 谢谢。

Answer 1

在Focus(得到焦点)事件里写timer1.Enable=False
在Blur(失去焦点)事件里写Timer1.Enable= True
回车时就触发你想要运行的函数，比如
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
'你要调用的方法，如Command1_Click
Timer1.Enable= True
End If
End Sub

Answer 2

Private Sub text1_Click()
MsgBox ""
End Sub

Answer 3

Private Sub Text1_GotFocus()
timer1.Enable=False
end sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Timer1.Enable= True
End If
End Sub