Private DateTime _dt = DateTime.Now; //定义一个成员函数用于保存每次的时间点
private void textBox1_KeyPress(object sender, KeyPressEventArgs e)
{
DateTime tempDt = DateTime.Now; //保存按键按下时刻的时间点
TimeSpan ts = tempDt .Subtract(_dt); //获取时间间隔
if (ts.Milliseconds > 50) //判断时间间隔,如果时间间隔大于50毫秒,则将TextBox清空 textBox1.Text = "";
dt = tempDt ;
}
vb:
Private _dt As DateTime = DateTime.Now '定义一个成员函数用于保存每次的时间点
Private Sub textBox1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles replaceppidnew.KeyPress
If e.KeyChar <> Chr(13) Then
''禁止用键盘手动输入
Dim tempDt As DateTime = DateTime.Now '保存按键按下时刻的时间点
Dim ts As TimeSpan = tempDt.Subtract(_dt) '获取时间间隔
If (ts.Milliseconds > 50) Then
textBox1.Text = "" '判断时间间隔,如果时间间隔大于50毫秒,则将TextBox清空
End If
_dt = tempDt
Else
Me.ActiveControl = textBox1
Me.textBox1.Focus()
End If
End Sub