如何防止MaxLength发出嘟嘟声或完全防止应用程序发出嘟嘟声

Question

我的问题：

当到达我的文本框的MaxLength时，会发出嘟嘟声。我想防止这种哔哔声，如果可以的话，我甚至会阻止我的应用程序的所有哔哔声。

我已经熟悉如何使用Substring和重置插入符号来模拟MaxLength，但在这个特定的例子中，替换MaxLength不是一个选项。

复制：

1. 在Visual Studio中，在设计模式下，将文本框拖动到新表单上
2. 按如下方式使用：

代码：

Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        TextBox1.MaxLength = 5
    End Sub
    Private Sub TextBox1_keypress(keyascii As Integer)
        If len(TextBox1.text) = 5 Then
            keyascii = 0
        End If
    End Sub
End Class

以上是我在网上遇到的例子的改编，但没有效果。

Answer 1

测试这个：

Private Sub TextBox1_KeyPress(sender As Object, e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
    If Not e.KeyChar.Equals(ControlChars.Back) Then
        If Me.TextBox1.TextLength = Me.TextBox1.MaxLength Then
            e.Handled = True
        End If
    End If
End Sub