Προγραμματισμός

* Γνώση Υπολογιστών >> Προγραμματισμός >> Visual Βασικά Προγραμματισμός

Πώς να κάνει ένα ηλεκτρονικό χρονόμετρο αντίστροφης μέτρησης

Έχοντας ένα ηλεκτρονικό χρονόμετρο αντίστροφης μέτρησης στην επιφάνεια εργασίας σας μπορεί να είναι ένας βολικός τρόπος για να παρακολουθείτε τα μεγάλα γεγονότα . Είτε θέλετε να ξέρετε πόσο καιρό θα είναι μέχρι το Σαββατοκύριακο ή μέχρι την ημέρα του γάμου σας , ένα χρονόμετρο αντίστροφης μέτρησης είναι σταθερή υπενθύμιση σας . Μπορείτε να κάνετε ένα ηλεκτρονικό χρονόμετρο αντίστροφης μέτρησης , χρησιμοποιώντας απλό λογισμικό προγραμματισμού . Και με μόνο λίγη υπομονή , θα πρέπει να μετράει αντίστροφα τις ημέρες , ώρες , λεπτά και δευτερόλεπτα . Τα πράγματα που θα χρειαστείτε
Visual Basic
Η Εμφάνιση Περισσότερες οδηγίες
Η 1

Ξεκινήστε το δικό σας αντίγραφο του Visual Basic και να κάνει ένα νέο έγγραφο . Κάντε κλικ στο " New Project ... " στο μενού βρέθηκε στα αριστερά της οθόνης σας . Επιλέξτε " Windows Forms Application " και κάντε κλικ στο " OK " για να ολοκληρώσετε συσταθεί. 2

διπλό κλικ στο " κουμπί" από το παράθυρο " Toolbox" . Αυτό θα εισάγει ένα νέο κουμπί ( Button1 ) στο παράθυρο του έργου σας . Με το ποντίκι σας , ρυθμίστε τη θέση και την τοποθέτηση του αν χρειαστεί .
Εικόνων 3

Κάντε διπλό κλικ στο " Χρονόμετρο " από την " Εργαλειοθήκη ". Αυτό θα εισάγει χρονοδιακόπτη σας στο χώρο εργασίας . Ρυθμίστε την τοποθέτηση , αν χρειαστεί .
Η

4 Κάντε διπλό κλικ στο " Ετικέτα " εργαλείο από το παράθυρο " Toolbox" . Αυτό θα εισάγει ένα παράθυρο οθόνη που θα χρησιμοποιηθεί από το χρονόμετρο σας . Ρυθμίστε τη θέση , αν χρειαστεί .
5

Κάντε διπλό κλικ στο " Button1 . " Αυτό θα ανοίξει ενότητα " Form1.vb " του . Βρείτε και επιλέξτε το πεδίο εισαγωγής για " Button1_Click . " Μπορείτε θα εισάγουν την κωδικοποίηση για τον έλεγχο διάστημα του χρονοδιακόπτη αντίστροφης μέτρησης . Ρυθμίστε το σε διαστήματα του ενός δευτερολέπτου από τη στιγμή βάσης των 15 λεπτών . Πληκτρολογήστε την παρακάτω κωδικό :

Timer1.Interval = 1000

Timer1.Start ( )

cntDown = Date.Now.AddMinutes ( 15 )
Η 6

Κάντε κλικ στην καρτέλα που ονομάζεται " Form1vb [ Σχέδιο ] " βρίσκεται κοντά στο κάτω μέρος του παραθύρου του "Timer " ελέγχου. Σύμφωνα με το " Timer1_Tick ", επιλέξτε το πεδίο εισαγωγής . Προσθέστε τον κώδικα που θα ελέγξει αν η αντίστροφη μέτρηση έχει τελειώσει και εμφανίζει πόσο καιρό έχει μείνει στην οθόνη αντίστροφης μέτρησης που προσθέσατε στο Βήμα 4 . Εισάγετε τον παρακάτω κωδικό :

Αν cntDown

Me.Timer1.Stop ( )

MessageBox.Show ( " ! Αντίστροφη μέτρηση έχει ολοκληρωθεί " )

Else

Dim timeRem Όπως TimeSpan = Me.cntDown.Subtract ( Date.Now )

Me.Label1.Text = String.Format ( " { 0 } : { 1 : d2 } : { 2 : d2 } " , _

timeRem.Hours , _

timeRem.Minutes , _

timeRem.Seconds )

End If

7

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

Συναφής σύστασή

Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα