Πώς να σταματήσει Beep Όταν Εισάγετε Pressed στο πλαίσιο κειμένου σε VB.NET

Το λειτουργικό σύστημα των Windows είναι event-driven . Αυτό σημαίνει ότι πολλές πιθανές δράσεις , όπως το πάτημα ενός πλήκτρου ή κλικ του ποντικιού , μπορεί να παράγει μια απάντηση από μια εφαρμογή λογισμικού . Ο έλεγχος των Windows κειμένουΈλεγχος συμπεριλαμβάνει έναν αγώνα που παρακολουθεί για πατήματα των πλήκτρων και απαντά με ένα προεπιλεγμένη συμπεριφορά . Η προεπιλεγμένη συμπεριφορά για το πάτημα ενός πλήκτρου είναι το σύστημα " μπιπ " ήχο . Η πλατφόρμα ανάπτυξης των Windows παρέχει έναν τρόπο για να αλλάξετε ή να προσαρμόσετε την προεπιλεγμένη συμπεριφορά και να σταματήσει τον ήχο μπιπ όταν το πλήκτρο " Enter" πιέζεται . Οδηγίες
Η

1 Ρυθμίστε το " KeyPreview " ιδιότητα της φόρμας των Windows για να "True " στο παράθυρο ιδιοτήτων του Explorer λύση . 2

Single - κλικ στο πλαίσιο κειμένου .

Η

3 Κάντε κλικ στο εικονίδιο " κεραυνός " στο παράθυρο των ιδιοτήτων . Αυτό αλλάζει την προβολή του παραθύρου ιδιοτήτων του για να εμφανίσετε όλα τα διαθέσιμα γεγονότα .
Η

4 Επιλέξτε το " PreviewKeyDown " τίτλο και κάντε διπλό κλικ στο κενό χώρο προς τα δεξιά για να δημιουργήσετε ένα πρόγραμμα χειρισμού συμβάντων προγραμματισμού στην κύρια φόρμα . Το παράθυρο εμφανίζει στη συνέχεια τον κωδικό του νέου χειρισμού συμβάντων του .
5

Δημιουργία λογική για να αλλάξει το γεγονός που συμβαίνει όταν πατάτε ένα πλήκτρο . Ο κώδικας που ακολουθεί είναι ένα παράδειγμα του πώς γίνεται αυτό :

TextBox1_PreviewKeyDown Private Sub ( αποστολέας αντικείμενο , PreviewKeyDownEventArgs ε)

( ByVal eventSender Όπως System.Object , ByVal Όπως EventArgs

System.Windows.Forms.KeyPressEventArgs ) Λαβές MyBase.KeyPress

Dim KeyAscii Όπως Short = Asc ( eventArgs.KeyChar )

Επιλογή περίπτωση KeyAscii

υπόθεση = Asc ( " »).

KeyAscii = Asc ( " , " )

eventArgs.Handled = True End

επιλέξτε

KeyAscii = 0

Αν KeyAscii = 0 τότε

eventArgs.Handled = True

End If

End Sub
Η
εικόνων