Ένα χρονόμετρο σε VB6

Ένα χρονόμετρο είναι ένα εργαλείο που ... OH καλά, δεν νομίζω ότι είναι σκόπιμο να εξηγήσει τι ένα χρονόμετρο, μάλλον θα πρέπει να κατανοήσουν πώς να κάνει ένα Visual Basic 6.

Οι λειτουργίες είναι πολύ απλή: ένα κουμπί Έναρξη ότι θα σταματήσει το χρονόμετρο θα ξεκινήσει σύντομα, μετράει τα δευτερόλεπτα από τη στιγμή που εν τω μεταξύ.

Κάνοντας κλικ στο κουμπί ξανά, ενώ λεζάντα του είναι Stop, το ρολόι θα επαναφέρετε το ίδιο και να σταματήσει.

Δημιουργούμε ένα νέο EXE σε αντίγραφο της VB6 μας και να δημιουργήσουμε μια φόρμα, προσθέτοντας μια ετικέτα, μια εντολή και ένα χρονόμετρο:

Αντιστοιχίστε το σήμα έχει το όνομα, το όνομα του στοιχείου ελέγχου κουμπιού και να εκχωρήσετε το όνομα με το χρόνο χρονόμετρο.

Έχουμε διπλό κλικ στο χρονόμετρο και προσθέστε τον ακόλουθο κώδικα:

 Private Sub tempo_Timer ()



    



 conta.Caption conta.Caption + 1 =







 Sub End

Απλά πηγαίνετε να αυξηθεί η αξία του σήματος της μονάδας.

Το πιο πολύπλοκο τον κώδικα να εφαρμοστεί το κουμπί:

 Private Sub comando_Click ()



    



 Αν comando.Caption = "Start" Τότε



        



 tempo.Enabled = True



        



 comando.Caption = "Stop"



        



 Καλέστε tempo_Timer



        



 tempo.Interval = 1000



    



 Αλλού



        



 tempo.Enabled = False



        



 comando.Caption = "Start"



        



 tempo.Interval = 0



        



 conta.Caption = 0



    



 End If







 Sub End

Εμείς ελέγξτε πρώτα ότι είναι του Ξεκινήστε capition, οπότε πάμε, έτσι ώστε:

• Ενεργοποιήστε το χρονόμετρο να τρέχει?
• μετονομάσετε τη λεζάντα του κουμπιού από το μενού Έναρξη για να σταματήσει?
• για να καλείτε τη λειτουργία που αυξάνει τη χρονοδιακόπτη?
• για να ορίσετε μια δεύτερη (1000) για τη λειτουργία χρονοδιακόπτη διάστημα.

Σε αυτό το σημείο το ρολόι έχει φύγει και θα δούμε ως εξής:

Κάντε κλικ ξανά για να σταματήσει, στο πλαίσιο της προετοιμασίας, το πρόγραμμα εισέρχεται στο άλλο υπό όρους μπλοκ, και εκτελεί τα εξής καθήκοντα:

• απενεργοποιήσει το χρονοδιακόπτη?
• αλλάζει τη λεζάντα του κουμπιού από διακοπή για να ξεκινήσετε?
• για να σταματήσει το χρονικό διάστημα?
• για να επαναφέρετε την τιμή χρονόμετρο.