VB.NET：如何驗證文本框不允許十進制值？

Question

我想知道如何驗證文本框以不允許任何十進制值？

Answer 1

我從此鏈接得到的解決方案（ 如何允許用戶在vb.net的文本框中僅輸入數字？ ）

   Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
    If (Microsoft.VisualBasic.Asc(e.KeyChar) < 48) _
              Or (Microsoft.VisualBasic.Asc(e.KeyChar) > 57) Then
            e.Handled = True
    End If
    If (Microsoft.VisualBasic.Asc(e.KeyChar) = 8) Then
            e.Handled = False
    End If
End Sub

Answer 2

您可以使用KeyPress事件並使用IsNumeric函數來捕獲數字鍵。

Private Sub TextBox1_KeyPress(sender As System.Object, e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
    If IsNumeric(e.KeyChar) Then
        e.Handled = True
    End If
End Sub

Answer 3

如果可以，請使用MaskedTextBox

由於處理KeyPress可能導致刪除/退格/復制/粘貼/ ...問題