Πώς να κάνω μια Αναβοσβήνει Button σε VB

Μαθαίνοντας πώς να κάνει ένα κουμπί που αναβοσβήνει σε Visual Basic.NET σας ( VB.NET ) αίτηση να κάνετε την αίτησή σας πιο ελκυστική για τον χρήστη . Θα πάμε να χρειαστεί να επαναλάβετε ένα τμήμα του κώδικα για να αλλάξετε το χρώμα του φόντου του κουμπιού σας και ο καλύτερος έλεγχος για να επιτευχθεί αυτό είναι ένα χρονοδιακόπτη . Ένα στοιχείο ελέγχου χρονοδιακόπτη θα εκτελέσει αυτόματα ένα τμήμα του κώδικα ανάλογα με την αξία του " Διάστημα " ιδιοκτησίας. Μπορείτε να χρησιμοποιήσετε το " BackColor " περιουσία για να αλλάξετε το χρώμα του κουμπιού και να ανανεώσετε τον έλεγχο με τη μέθοδο της « Application.DoEvents " . Τα πράγματα που θα χρειαστείτε για Microsoft Visual Studio
Η Εμφάνιση Περισσότερες οδηγίες
Η 1

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

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

διπλό κλικ στο " χρονόμετρο " για να προσθέσετε ένα νέο στοιχείο ελέγχου χρονοδιακόπτη . Κάντε δεξί κλικ στο στοιχείο ελέγχου με χρονοδιακόπτη και κάντε κλικ στο "Ιδιότητες". Ρυθμίστε το " Enabled " ιδιότητα " True" και ρυθμίστε το " Διάστημα " ιδιότητα " 500 ".
Η

4 Κάντε διπλό κλικ στο χρονοδιακόπτη να δημιουργήσετε ένα γεγονός τσιμπούρι και να προσθέσετε την ακόλουθη γραμμή κώδικα για να δημιουργήσετε μια καθολική μεταβλητή παραπάνω " Timer1_Tick : "

Dim αναλαμπή Όπως Boolean
5

Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα στο εσωτερικό του " Timer1_Tick " εκδήλωση για να κάνει το κουμπί αναβοσβήνει αλλάζοντας το φόντο και πίσω από πορτοκαλί σε κόκκινο :

Αν ( αναβοσβήνει ) ThenMe.Button1.BackColor = Color.Redblink = FalseApplication.DoEvents ( ) ElseMe.Button1 . BackColor = Color.Orangeblink = TrueApplication.DoEvents ( ) End If
Η

6 Πατήστε το πλήκτρο " F5 " για να τρέξει το πρόγραμμα και να δούμε το πλήκτρο αναβοσβήνει .

Η