Πώς να κάνει ένα κλικ του ποντικιού Event με χρήση της Visual Basic

Όταν πρόκειται για τα γεγονότα του ποντικιού κάντε κλικ στη Visual Basic , μεγάλο μέρος του έργου του χειρισμού τους έχει ήδη γίνει για εσάς . Οι περισσότεροι έλεγχοι σε Visual Basic έχουν το " Click ", " MouseDown " και " MouseUp " γεγονότα που μπορείτε να χρησιμοποιήσετε για να ελέγχουν το πρόγραμμα , όταν ο χρήστης κάνει κλικ με το ποντίκι . Επίσης , μπορείτε να χρησιμοποιήσετε τα " MouseEventArgs " ιδιότητες τάξη να παρέχουν πρόσθετα στοιχεία για αυτά τα γεγονότα , όπως ποιο κουμπί του ποντικιού ο χρήστης πάτησε το κουμπί ή οι συντεταγμένες του ποντικιού στη φόρμα . Αφού δημιουργήσετε ένα νέο έργο της Visual Basic , μπορείτε να κάνετε κλικ με το ποντίκι γεγονότα με διάφορους τρόπους . Οδηγίες ένα κλικ Event

1

Κάντε διπλό κλικ στο " κουμπί" ελέγχου στην εργαλειοθήκη για να προσθέσετε το " Button1 " στη φόρμα . 2

διπλό κλικ στο " Button1 "για να ανοίξει το " Button1_Click " παράθυρο κώδικα
εικόνων 3

Πληκτρολογήστε τα ακόλουθα : .

MsgBox ( " Έχετε κλικ στο κουμπί " , MsgBoxStyle.Information , " ! Κάντε κλικ στο κουμπί " )

Όταν ο χρήστης κάνει κλικ Button1 , μια ενημερωτική κουτί με τις οθόνες του μηνύματος . Αντικαταστήστε το με πιο πρακτικό κώδικα , όπως μια κλήση σε μια άλλη λειτουργία , αλλάζοντας τις τιμές σε ετικέτες ή πλαίσια κειμένου , ή να προτρέπει το χρήστη για περισσότερες πληροφορίες.
Εικόνων ποντίκι κάτω και πάνω
Η 4

κάντε διπλό κλικ στο " ετικέτα " ελέγχου στην εργαλειοθήκη για να προσθέσετε το " Label1 " στη φόρμα . Αλλαγή ιδιοκτησίας κείμενό της στην « Δεν έχετε κάνει κλικ στην ετικέτα . " Ανοίξτε το παράθυρο κώδικα
5

Ανοίξτε τη λειτουργία " Label1_MouseDown » και πληκτρολογήστε τα εξής: .

Label1.Text = " . Αυτή τη στιγμή κάνετε κλικ στην ετικέτα "

η ετικέτα εμφανίζεται αυτό το μήνυμα , όταν ο χρήστης κάνει κλικ στην ετικέτα
Η 6

Ανοίξτε τη λειτουργία " Label1_MouseUp » και πληκτρολογήστε τα εξής: .

Label1.Text = " Έχετε σταματήσει κλικ στην ετικέτα "

η ετικέτα εμφανίζεται αυτό το μήνυμα όταν ο χρήστης απελευθερώνει το κουμπί του ποντικιού
Η 7

Ανοίξτε το . " λειτουργία Label1_MouseLeave »και πληκτρολογήστε τα εξής: .

Αν Label1.Text = " Έχετε σταματήσει να κάνετε κλικ στην ετικέτα . " Στη συνέχεια

Label1.Text = " Μπορείτε να κάνετε κλικ στην ετικέτα . "