Γεια σου, εδώ αφήνω ένα πολύ απλό παράδειγμα σε Visual Basic. καθαρό για να αξιολογήσει τις πληκτρολογήσεις κατά την εισαγωγή δεδομένων σε ένα πλαίσιο κειμένου και επιτρέπουν μόνο γράμματα αγνοώντας κάθε τι που δεν είναι γράμμα. Είναι βασικό, αλλά θα χρησιμεύσει ως αφετηρία για την επικύρωση οποιοδήποτε εισόδημα. Ο κώδικας που ακολουθεί ....
TextBox1_KeyPress Private Sub (ByVal αποστολέα ως αντικείμενο, ByVal e Όσον System.Windows.Forms.KeyPressEventArgs) Λαβές TextBox1.KeyPress Αν (Δεν Char.IsLetter (e.KeyChar) Και e.KeyChar <> Microsoft.VisualBasic.ChrW (8)) Τότε e.Handled = True End If Sub End
Η char τύπος έχει πολλές ιδιότητες ότι θα ήταν πολύ χρήσιμο κατά την εκτέλεση επικυρώσεις. Στο παράδειγμα βλέπουμε το ακίνητο IsLetter ... Εδώ λίγο περισσότερο για να θυμόμαστε.:
IsControl: Δείχνει αν το καθορισμένο χαρακτήρα Unicode έχει χαρακτηριστεί ως χαρακτήρα ελέγχου
Isdigit: Δείχνει αν το καθορισμένο χαρακτήρα Unicode έχει χαρακτηριστεί ως ένα δεκαδικό ψηφίο
ISNUMBER: Δείχνει αν το καθορισμένο χαρακτήρα Unicode έχει χαρακτηριστεί ως μια σειρά
IsLetterOrDigit: Δείχνει αν το καθορισμένο χαρακτήρα Unicode έχει κατηγοριοποιηθεί ως έναν αλφαβητικό χαρακτήρα ή ένα δεκαδικό ψηφίο
και πολλά άλλα ... Θα σας δώσω μερικές χρήσιμες συμβουλές ... πάντα να συμβουλεύεστε τη βοήθεια.
Πληροφορίες Bitacoras.com ...
Εάν επιθυμείτε, μπορείτε να κάνετε κλικ για να αξιολογήσετε αυτό το Bitacoras.com μετά. Χάρη ....
Σας ευχαριστούμε!
ευχαριστίες για τη βοήθεια, είμαι iniciandome σε vb.net και διδάχτηκα αυτόν τον τρόπο:
If Not (Char.IsLetter(e.KeyChar) Or Asc(e.KeyChar) = 32 Or Asc(e.KeyChar) =
Then e.Handled = True
χρησιμοποιήσατε microsoft.visual σας ... κλπ, πείτε στους φίλους που είναι πιο βολικό και εύκολο στη χρήση;
JAJAJJAAJAJA ΔΕΝ έτσι θα μπορούσα εύκολα να αποθηκεύσετε αριθμών και συμβόλων
Χαιρετισμούς, είμαι νέος σε αυτό και δεν βλέπω το πάτημα μέθοδο, που μπορώ να κάνω;
Κατά την εξέταση του σχεδιασμού κάνετε διπλό κλικ σε ένα στοιχείο ελέγχου, πηγαίνετε στην προβολή κώδικα και το γεγονός ότι ο έλεγχος αυτός έχει το προεπιλεγμένο. Για παράδειγμα, αν κάνετε διπλό κλικ σε ένα TextBox1're ελέγχου πρόκειται να TextBox1_TextChange κωδικό, στη συνέχεια με τον κέρσορα μέσα σ'αυτή τη συνάρτηση είναι comboque ανοίξει το πάνω δεξιά υπάρχει στο παράθυρο κώδικα, όπου παρατίθενται όλες τις μεθόδους ελέγχου της εν λόγω . Και τα όπλα που θα επιλέξετε ρουτίνα πάτημα των πλήκτρων.
Υπάρχει άλλος τρόπος να το κάνουμε. Αν αυτό δεν είναι που επιτρέψτε μου να ξέρω.
Ευχαριστώ για την πολύ καλή κωδικό άνδρες, να βάλει περισσότερα από ό, τι χρειάζεται ..
Η συμβολή σας είναι πολύ καλή, αλλά ελπίζω ότι θα μπορούσατε να βάλετε όλοι ότι ο κώδικας έχει να κάνει με το λογισμικό για επικυρώσεις.
αφορά
ευχαριστώ για την είσοδο
Είμαι μόλις αρχίζει και θα χρειαστεί όλη τη βοήθεια που είναι δυνατόν
Βοήθεια ...! Necesiito επικυρώσει ορισμένα πεδία σε μια φόρμα για να λάβετε μόνο γράμματα, αλλά το κάνω με μια λειτουργία .. ο καθένας ξέρει πώς να το πράξει;
Cualkier συμβολή ayudari μου ..!
Fun_ValidarDatos δημόσιο λειτούργημα (ByVal campovalidar Όπως String) Όπως Boolean
LsResultado Δημ. As String = "επικυρωμένες"
Αν Char.IsLetter (lsUsuario) Στη συνέχεια,
επιστρέφουν True
Αλλού
επιστρέψει ψευδείς
End If
Τέλος Λειτουργία
Εδώ τελειώνει η λειτουργία κλήσης για να το καταλάβει αυτό, όπως:
Fun_ValidarDatos ("αυτό θα επιστρέψει ψευδείς και να επικυρώνει ότι έχει τον αριθμό 96")
VISUAL BASIC έχω υπνηλία, θαμπό LEARN JAVA
ΟΤΙ ΕΙΝΑΙ:
Fun_ValidarDatos δημόσιο λειτούργημα (ByVal campovalidar Όπως String) Όπως Boolean
Αν Char.IsLetter (campovalidar) Στη συνέχεια,
επιστρέφουν True
Αλλού
επιστρέψει ψευδείς
End If
Τέλος Λειτουργία
Εδώ τελειώνει η λειτουργία κλήσης για να το καταλάβει αυτό, όπως:
Fun_ValidarDatos ("αυτό θα επιστρέψει ψευδείς και να επικυρώνει ότι έχει τον αριθμό 96")
VISUAL BASIC έχω υπνηλία, θαμπό LEARN JAVA
μόνο καλό "Know"
ΣΑΣ ΕΥΧΑΡΙΣΤΟΥΜΕ ...:>
Κύματα kn Code παρέχεται οπτική κονσόλα .. αλλά .. Το μόνο έγκυρο αριθμό (12345679), αλλά αν έβαλα δέχεται αριθμούς και γράμματα (abc123). Έχω επίσης κατανοητό ότι οι αριθμοί 48 έως 57 αποτελούν τους αριθμούς 1 έως 9. Μπορώ να χρησιμοποιήσω αυτά ασφάλεια, αλλά ο κώδικας θα είναι πάρα πολύ ..!
Microsoft.VisualBasic.ChrW (48)) -> 0
...
Microsoft.VisualBasic.ChrW (57)) -> 9
Αυτός είναι ο κώδικας στην κονσόλα ..!
name = InputBox ("Πληκτρολογήστε το όνομα:")
Να Ενώ (Δεν Char.IsLetter (nom) Και nom Microsoft.VisualBasic.ChrW (32))
name = InputBox ("Πληκτρολογήστε το όνομά σας και πάλι δείτε")
βρόχος
είναι ότι το φόρουμ είναι για κουτάκι, αλλά βλέποντας το ίδιο πρόβλημα της επικύρωσης, βρήκα χρήσιμο να ζητήσει, περιμένω μια απάντηση ... ευχαριστώ εκ των προτέρων ...!
Πολύ απλή και αποτελεσματική. Το μόνο που απαιτείται στην περίπτωσή μου δεν δέχομαι τους αριθμούς, δεν έχει σημασία αν έχετε εισάγει ένα άλλο παράξενο σύμβολο.
TextBox1_KeyPress Private Sub (ByVal αποστολέα ως αντικείμενο, ByVal e Όσον System.Windows.Forms.KeyPressEventArgs) Λαβές TextBox1.KeyPress
Αν Char.IsNumber (e.KeyChar) Στη συνέχεια,
e.Handled = True
End If
Sub End
Σας ευχαριστώ.
κώδικα σε VB.NET 2005, που δέχεται μόνο αριθμούς
γράψει ένα γράμμα, όταν παίρνω ένα μήνυμα που δέχεται μόνο αριθμούς
Επίσης, η περίπτωση με οποιαδήποτε caráter παράδειγμα: -.,, '{>, μόνο οι αριθμοί
Που προκύπτουν από αυτή κωδικός δεν λειτουργεί και για αρχάριους!! Οποιοσδήποτε χρήστης μπορεί να εισέλθει εύκολα αριθμούς. Αντιγραφή και επικόλληση
Σταματήστε να χρησιμοποιείτε τον κωδικό αυτό ή το γεγονός configurenle KeyDown και το ποντίκι αντίγραφο της εκδήλωσης κάντε κλικ δεξιά και πάστα.
Υπεύθυνη υπηρεσία. Προγραμματιστής
Σας ευχαριστούμε! Ξαναπαίρνω σερβίρεται!