在vb.net中只允许一个数字

我是编程新手，我想寻求帮助。我要求在vb.net中输入代码，在文本框中输入句号或“.”后，我希望文本框只接受数字5。在我输入句号或“.”后，文本框将不接受文本框中的任何字母、数字或特殊字符这可能会帮助您：

Private Sub TextBox1\u KeyDown（发送方作为对象，e作为KeyEventArgs）处理TextBox1.KeyDown
如果使用（“.”）和（e.KeyData Keys.D5）修剪（CType（sender，TextBox）.Text）.EndsWith，则
e、 SuppressKeyPress=True
e、 已处理=真
Console.WriteLine（“键入另一个键。这不是数字5”）
如果结束
端接头

请包含显示问题的代码。如果last text=“”，则使用按键事件。句柄=不是e。字符相等（5）。。。我记不起语法了，但就是这样！哦，对不起。我是编程新手，对vb.net知之甚少，我想知道代码，因为我不知道。我只是想修改我的问题。对不起，我躺在床上准备睡觉，你可以试试我的方法。在文本框中使用keydown事件，检查最后一个文本是否为“”，如果为“”，则e。句柄=不是e。钥匙相等（5）。。。知道某样东西是否有效的唯一方法就是尝试它！我尝试了E.handled=note.char.equal（5）和E.handled=note.key.equal（5），但E.char和E.key中都有一个错误，它说“key不是system.windows.forms.KeyEventArgs的成员”和“char不是system.windows.forms.KeyEventArgs的成员”。这两种方法都适用于键控事件

Private Sub TextBox1_KeyDown(sender As Object, e As KeyEventArgs) Handles TextBox1.KeyDown
    If Trim(CType(sender, TextBox).Text).EndsWith(".") AndAlso (e.KeyData <> Keys.D5) Then
        e.SuppressKeyPress = True
        e.Handled = True  
        Console.WriteLine("Type another key. this is not number 5")
    End If
End Sub