在此 RichTextBox 中,我想知道键盘上的“ Backspace”键使用了多少次。到目前为止,我已经使用了此代码,但是出了点问题。这是这种情况:按Enter键时,MessageBox将显示已使用Backspace多少次。请帮助我。
Private Sub RichTextBox1_KeyDown(sender As Object, e As KeyEventArgs) Handles RichTextBox1.KeyDown
Dim count As Integer
If (e.KeyCode = Keys.Back) Then
count = count + 1
ElseIf (e.KeyCode = Keys.Enter) Then
MessageBox.Show(count)
End If
End Sub
答案 0 :(得分:1)
如@Visual Vincent所述,您需要将'count'声明移出事件。
Private count As Integer = 0
Private Sub RichTextBox1_KeyDown(sender As Object, e As KeyEventArgs) Handles RichTextBox1.KeyDown
If e.KeyCode = Keys.Back Then count += 1
If e.KeyCode = Keys.Enter Then
MessageBox.Show(count)
count = 0
End If
End Sub