Ξεκινήστε μια νέα έργο των Windows Αίτηση σε Visual Basic . ΝΕΤ δίνει ένα κατάλληλο όνομα , κάτι σαν " Παράδειγμα VB Θέματος ". Αυτό θα δημιουργήσει μια νέα εφαρμογή για εσάς με μία κύρια φόρμα . 2
Αλλαγή σε κώδικα πίσω από την κύρια φόρμα και προσθέστε " Εισαγωγές System.Threading "
στην κορυφή . Αυτό εισάγει το " . Net" namespace που απαιτούνται για την εργασία με τα θέματα .
Εικόνων 3
Δημιουργήστε τη ρουτίνα που θα είναι το έργο το νήμα. Εδώ είναι ένα απλό παράδειγμα που απλά μετράει 0-10000 :
Public Sub LongProcess ( )
Dim Δείκτης As Integer
Για Δείκτης = 0 Για 10000
Application.DoEvents ( )
Επόμενο
MsgBox ( " Θέματος Ολοκληρώθηκε " )
End Sub
Αυτό θα προσομοιώνουν τη μακρά διαδικασία λειτουργίας . Long υπολογισμοί για την αργή κλήσεις βάση δεδομένων θα ήταν καλό οι υποψήφιοι να επισυνάψουν σε μια ρουτίνα που μπορεί στη συνέχεια να περαστεί
Η 4
Προσθέστε ένα κουμπί στη φόρμα και κάντε κλικ στο χειριστή να ξεκινήσουμε το έργο : .
Dim t Όπως Θέματος
t = νέου Θέματος ( AddressOf LongProcess )
t.Start ( )
MsgBox ( " Πρόγραμμα Ολοκληρώθηκε " )
Πάρτε ιδιαίτερη ειδοποίηση της τοποθέτησης των εντολών MsgBox . Διαδοχική προγραμματισμός θα σήμαινε ότι η «Νήμα Ολοκληρώθηκε " θα είναι το πρώτο πλαίσιο μηνύματος για να εμφανιστεί . Όπως μπορείτε να δείτε , όταν το πρόγραμμα εκτελείται , αυτό δεν είναι η περίπτωση .
5
Εκτελέστε το πρόγραμμα " Παράδειγμα VB Θέματος " και κάντε κλικ στο κουμπί της φόρμας . Παρατηρήστε ότι το «Πρόγραμμα Ολοκληρώθηκε " πλαίσιο μηνύματος εμφανίζεται για πρώτη φορά . Αυτό οφείλεται στο γεγονός ότι το πρόγραμμα « γέννησε » το νήμα που εξακολουθεί να εργάζεται ? Όταν θα έχει τελειώσει που θα εμφανιστεί το πλαίσιο μηνύματος . Κάντε το μετρητή πάει υψηλότερα για να αυξήσει αυτή την καθυστέρηση .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα