Deaktivieren von Buchstaben und speziellen Zeichen, die in Visual Basic.NET

Im neu in visual basic und im nicht sicher, wie zu deaktivieren, Buchstaben und Sonderzeichen.

Ich will Nur die Benutzer in der Lage sein, um zahlen einzugeben.

Im mit diesem code im wissen, dass es einen einfacheren Weg, es zu tun und jede Hilfe ist geschätzt

Bekomme ich die message-box, wenn ich die Eingabe der alphabetischen Zeichen, und wenn ich die zahlen einzugeben. ich will nicht, um die message-box, wenn ich zahlen einzugeben.

Private Sub txtCustom_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles txtCustom.KeyDown

    If (e.KeyCode = Keys.Enter) Then

        e.SuppressKeyPress = True

        If (e.KeyCode = Keys.A Or Keys.B Or Keys.C Or Keys.D Or Keys.E Or Keys.F Or Keys.G Or Keys.H Or Keys.I Or Keys.J Or Keys.K Or Keys.L Or Keys.M Or Keys.N Or Keys.O Or Keys.P Or Keys.Q Or Keys.R Or Keys.S Or Keys.T Or Keys.U Or Keys.V Or Keys.W Or Keys.X Or Keys.Y Or Keys.Z) Then

            Beep()
            MsgBox("Please Input A Numerical Value")
            txtCustom.Text = ""

        Else

            RandNumAllow = txtCustom.Text

        End If

    End If

End Sub

Dieser code scheint zu funktionieren nur, wenn Sie geben Sie die Geben Sie Schlüssel und in diesem Fall der char könnte nicht ein Buchstabe sein. Sind Sie sicher, dass gepostet hast, den richtigen code?
Es ist nichts ärgerlicher, als ein Programm, das bestraft der user so. Es ist wie die Anwendung einen kleinen elektrischen Schock, Ihre Benutzer schnell genug. Verwenden Sie stattdessen das Validating-Ereignis und sagen, Decimal.TryParse() zum überprüfen der Eingabe. Und ErrorProvider zur Versorgung einer subtilen Fehler-Anzeige.

InformationsquelleAutor Zukrooo_y0 | 2012-10-21

vb.net

8

Versuchen Sie es mit dem KeyPress-Ereignis statt:
```
Private Sub TextBox1_KeyPress(sender As Object, _
                              e As KeyPressEventArgs) Handles TextBox1.KeyPress
  e.Handled = Not Char.IsNumber(e.KeyChar)
End Sub
```
Aber das wird nicht aufhören, jemand aus mit der Zwischenablage. Es ist wahrscheinlich besser, verwenden Sie das MaskedTextBox-Steuerelement statt.
- Ich beschloss, verwenden Sie ein maskiertes Textfeld, vielen Dank für die Hilfe, es ist nicht ganz wie ich es wollte, aber danke es war so viel schneller
- Diese nicht-block (T-Shirt + eine Zahl) Sonderzeichen.
- Dies wird auch löschen deaktivieren und wieder Raum, wie können Sie aktiviert werden?
- Platzieren Sie eine If Not e.KeyChar.Equals(Convert.ToChar(Keys.Back)) Then Zustand. Die entf-Taste funktioniert bei mir, btw.
InformationsquelleAutor LarsTech

Sorry für die späte Antwort dieser code die Lösung für alle Probleme, kopieren Sie aus der Zwischenablage und shift + Zahl Sonderzeichen enthalten, da Sie mit dem TextChanged event-probieren Sie es aus.

    Dim charactersAllowed As String = "1234567890"
      Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged
    Dim theText As String = TextBox1.Text
    Dim Letter As String
    Dim SelectionIndex As Integer = TextBox1.SelectionStart
    Dim Change As Integer
    For x As Integer = 0 To TextBox1.Text.Length - 1
        Letter = TextBox1.Text.Substring(x, 1)
        If charactersAllowed.Contains(Letter) = False Then
            SystemSounds.Beep.Play()
            theText = theText.Replace(Letter, String.Empty)
            Change = 1
        End If
    Next
    TextBox1.Text = theText
    TextBox1.Select(SelectionIndex - Change, 0)
End Sub

Können Sie ersetzen Sie den Wert von charractersAllowed mit dem, was die Zeichen, die Sie zulassen möchten

InformationsquelleAutor The Only Smart Boy

Den code, den Sie gesucht haben ich denke, sieht so aus.

Für das keypress-Ereignis auf beliebige text-oder Eingabefeld Ihren Versuch, die Kontrolle Eingang in

If (e.KeyChar < "0" OrElse e.KeyChar > "9") AndAlso 'restricts anything but number keys
    e.KeyChar <> ControlChars.Back Then 'allows use of backspace
    e.Handled = True
End If

InformationsquelleAutor chervani

Schreibe einen Kommentar

Du musst angemeldet sein, um einen Kommentar abzugeben.