VB.Net下用正則表達(dá)式阻止非法字符輸入

hotpower

    Private Sub TextBox1_KeyPress(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
        Dim ch As Char = e.KeyChar
        If Not Regex.IsMatch(ch.ToString(), "^[\b\r0-9a-fA-F]$") Then
            e.KeyChar = "" '放棄輸入的非法字符
            MessageBox.Show("請(qǐng)正確輸入16進(jìn)制數(shù)!!!", "系統(tǒng)提示", MessageBoxButtons.OK, MessageBoxIcon.Error)
        Else
            e.KeyChar = Char.ToUpper(ch) '強(qiáng)制轉(zhuǎn)換為大寫(xiě)字母,放過(guò)退格和回車(chē)符
        End If
    End Sub

alpha321

Regex.IsMatch(ch.ToString(), "^[\b\r0-9a-fA-F]$") ,
很典型的應(yīng)用,不錯(cuò).
正則表達(dá)式功能的確很強(qiáng)大.

陳小東

哈哈 支持下

陳小東

哈哈 支持下