如何在VB.net 2005中输入期间过滤和替换TextBox字符

时间:2013-08-15 16:03:08

标签: vb.net windows-ce

我有两个textBox输入字段,必须是数字,限制为7位数。但是,目标设备有一个带有共享数字小键盘的小键盘,可以通过numlock键访问,因此键'E'可以作为'1'。问题是,如果启用了numlock,则退格/ del键不起作用,因此难以输入...胖子不断推错钥匙等......

所以我想做的是在输入时自动将'E'转换为'1','R'转换为'2'等。我不想看'E'然后'1',它必须看起来就像按下了numlock一样。如果按下numlock,它也必须接受0..9。

替换这些字符:“ertdfgxcvERTDFGXCV0123456789” 对于这些:“012345678901234567890123456789”

在VB.net-2005中有一种简单的方法吗?

1 个答案:

答案 0 :(得分:0)

您可以使用此活动;

Private Sub TextBox1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox1.KeyPress
    Dim counter As Integer = 0
    For Each c As Char In "ertdfgxcvERTDFGXCV"
        If e.KeyChar = c Then
            e.KeyChar = Chr(48 + counter)
        End If
        counter += 1
        If counter = 10 Then counter = 0
    Next

End Sub