Πώς να χρησιμοποιήσετε Itemcheck Εκδήλωση στη Visual Basic

Χρησιμοποιώντας ελέγχεται λίστας είναι ο καλύτερος τρόπος για να δώσει στο χρήστη μια λίστα επιλογών για να επιλέξετε από μια εφαρμογή της Visual Basic . Στη VB , μπορείτε να χρησιμοποιήσετε το " CheckedListBox.ItemCheck " εκδήλωση για την ανίχνευση όταν η κατάσταση ενός στοιχείου αλλαγές . Η εκδήλωση αυτή είναι επίσης διαθέσιμη χρησιμοποιώντας ένα στοιχείο ελέγχου πλαισίου λίστας . Η κατάσταση ελέγχου θα ενημερώσει μετά το " ItemCheck " εκδήλωση εκτελεί . Χρησιμοποιήστε αυτό το συμβάν για να ενημερώσετε άλλους ελέγχους ή να εμφανίσει ένα μήνυμα στον χρήστη όταν ένα στοιχείο έχει πατηθεί. Οδηγίες
Η 1

την εφαρμογή Microsoft Visual Basic Express , κάντε κλικ στο " New Project" στο αριστερό τμήμα της οθόνης του υπολογιστή σας και κάντε διπλό κλικ στο " Windows Forms Application " για να δημιουργήσετε ένα νέο έργο .

2

διπλό κλικ στο " CheckedListBox " από την " Toolbox" παράθυρο για να δημιουργήσετε ένα νέο στοιχείο ελέγχου πλαισίου λίστας . Κάντε διπλό κλικ στη φόρμα για να δημιουργήσετε ένα νέο συμβάν φόρτωσης της φόρμας και πληκτρολογήστε τον ακόλουθο κώδικα για να γεμίσει το στοιχείο ελέγχου πλαισίου λίστας με τρία στοιχεία :

Me.CheckedListBox1.Items.Add ( « ελέγχεται σημείο 1 " )

Me.CheckedListBox1.Items.Add ( « ελέγχεται σημείο 2 " )

Me.CheckedListBox1.Items.Add ( « ελέγχεται σημείο 3 " )
εικόνων 3

κάντε δεξιό κλικ στο στοιχείο ελέγχου πλαισίου λίστας , κάντε κλικ στο κουμπί "Ιδιότητες" και ορίστε το " CheckOnClick " σε " True ". Κάντε κλικ στο εικονίδιο " Events" , που μοιάζει με μια απεργία αστραπής και κάντε διπλό κλικ δίπλα στο " ItemCheck " για να δημιουργήσετε ένα νέο συμβάν ελέγχου για το στοιχείο .
Η

4 Πληκτρολογήστε τον ακόλουθο κώδικα για να προσδιορίσει το στοιχείο ελέγχεται στον έλεγχο :

Αν ( e.CurrentValue = CheckState.Unchecked ) Στη συνέχεια

MessageBox.Show ( . Me.CheckedListBox1.Items ( e.Index ) ToString & " . ελέγχθηκε " )

ElseIf ( e.CurrentValue = CheckState.Checked ) Στη συνέχεια

MessageBox.Show ( Me.CheckedListBox1.Items ( e.Index ) . ToString & " ήταν ανεξέλεγκτη . " )

End Αν
5

Πατήστε το " F5 " για να τρέξετε το πρόγραμμά σας και να ελέγξετε οποιοδήποτε στοιχείο στο πλαίσιο λίστας για να εμφανιστεί ένα πλαίσιο μηνύματος με το αντικείμενο που θα μεταφερθεί .
εικόνων