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

Έχοντας τη γνώση για να οικοδομήσουμε ένα ηλεκτρονικό χρονόμετρο αντίστροφης μέτρησης , χρησιμοποιώντας τον κωδικό των Windows μπορείτε να εξοικονομήσετε χρόνο . Ένα ηλεκτρονικό χρονόμετρο μπορεί να κατασκευαστεί χρησιμοποιώντας το Microsoft Visual Basic.NET ( VB.NET ) - ένα αντικείμενο με προσανατολισμό programing γλώσσα υπολογιστών . Ένα ηλεκτρονικό χρονόμετρο μπορεί να χρησιμοποιηθεί σε μια εφαρμογή των Windows για να μετρήσει και να εκτελέσει άλλες διαδικασίες , όταν το χρονόμετρο σταματά την καταμέτρηση . Σε μερικά βήματα , θα δημιουργήσετε ένα χρονόμετρο αντίστροφης μέτρησης , χρησιμοποιώντας ένα χρονόμετρο ελέγχου και μια ετικέτα για να εμφανιστεί η ώρα . Τα πράγματα που θα χρειαστείτε για Microsoft Visual Basic Express
Η Εμφάνιση Περισσότερες οδηγίες
Η 1

Ξεκινήστε το Microsoft Visual Basic Express , στη συνέχεια, κάντε κλικ στο " New Project ... " στο αριστερό τμήμα της οθόνης σας . Επιλέξτε " Windows Forms Application ". Κάντε κλικ στο " OK". 2

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

διπλό κλικ στο " Ετικέτα " για να προσθέσετε μια ετικέτα . Η ετικέτα θα πρέπει να χρησιμοποιηθεί για να εμφανίσετε την ώρα , όπως είναι φθίνουσα . Κάντε διπλό κλικ στο " Button1 " για να ανοίξει το μάθημα « Form1.vb " .
Η 4

Πληκτρολογήστε τα ακόλουθα στο " Button1_Click " για να ρυθμίσετε το χρονικό διάστημα Timer σε 1 δευτερόλεπτο , ξεκινήστε το χρονόμετρο , και να αρχίσει την αντίστροφη μέτρηση από 15 λεπτά από τώρα .

Timer1.Interval = 1000

Timer1.Start ( )

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

κάντε κλικ στο " Form1.vb [ Σχέδιο ] " καρτέλα και doube κλικ στο " Χρονόμετρο " ελέγχου στο κάτω μέρος της οθόνης σας .
Η 6

Πληκτρολογήστε τα ακόλουθα στο " Timer1_Tick " για να δείτε αν η αντίστροφη μέτρηση έχει ολοκληρωθεί . Αν δεν έχει , τότε συνεχίστε να πάρει τη διαφορά μεταξύ του τρέχοντος χρόνου και την « cntDown " μεταβλητή . Εμφανίστε τη διαφορά μέσω του ελέγχου Label .

Εάν cntDown

Me.Timer1.Stop ( )

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

υπόλοιπα

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 " για να ξεκινήσει η αντίστροφη μέτρηση .
Η
εικόνων