Πώς να αντλία μηνυμάτων με Vb.Net

" . Αντλία μήνυμα" Στις εφαρμογές των Windows , η λειτουργία διαδικασίες συμβάντων που βασίζεται σε έναν βρόχο πρόγραμμα που ονομάζεται « βρόχο εκδήλωση " ή το σύστημα εισάγει τα μηνύματα , τα αντικείμενα πληροφοριών που περιέχει αριθμητικό κωδικό , σε ένα Message Queue ενώ διάφορες εκδηλώσεις συμβούν , όπως ποντίκι κλικ ή πληκτρολόγηση . Το σύστημα περνά όλες τις εισόδους για την εφαρμογή των διαφορετικών παραθύρων της εφαρμογής . Κάθε παράθυρο έχει μια λειτουργία που ονομάζεται " διαδικασία παραθύρου . " Η διαδικασία παράθυρο επεξεργάζεται εισόδου και επιστρέφει τον έλεγχο στο σύστημα. Μπορείτε να δημιουργήσετε μια αντλία μήνυμα χρησιμοποιώντας τις λειτουργίες GetMessage και DispatchMessage . Τα πράγματα που θα χρειαστείτε
VB.NET
Η Εμφάνιση Περισσότερες οδηγίες
Η

1 Κάντε κλικ στο κουμπί " Έναρξη", " Όλα τα προγράμματα " και " Visual Studio " για να ανοίξετε το ολοκληρωμένο περιβάλλον ανάπτυξης ( IDE. ) Κάντε κλικ στο " Αρχείο" και " νέο" για να δημιουργήσετε ένα νέο έργο . Κάντε κλικ στο εικονίδιο " Visual Basic" να επεκτείνει τον τύπο εφαρμογής στο αριστερό τμήμα του πλαισίου διαλόγου . Επιλέξτε " των Windows Αίτηση " στο δεξιό τμήμα του παραθύρου . Πληκτρολογήστε ένα όνομα για το έργο . Καθορίστε μια τοποθεσία για τα αρχεία του έργου , κάνοντας κλικ στο "Browse ". 2

Κάντε κλικ στο " Form1.vb " στην Εξερεύνηση λύση για να μπείτε στο παράθυρο κώδικα . Καθορίστε τις μεταβλητές : Dim hinst AS HINSTANCEDim hWnd AS HWNDDim msg AS MSGDim wc AS WNDCLASS
εικόνων 3

Εισάγετε τον παρακάτω κωδικό μεταξύ Sub WinMain και End Sub : wc.hinstance = hInstancewc . lpszMenuName = " mainmenu " wc.laszClassName = " MainWndClass "

Αυτός ο κωδικός καταγράφει την κλάση παραθύρου για το κύριο παράθυρο
Η 4

Δημιουργήστε τα κύρια παράθυρα μέσω του κωδικού : . hwndMain = CreateWindow ( " MainWndClass " , "Δείγμα" , WS_OVERLAPPEDWINDOW , hInstance ) Δείτε το παράθυρο και να καταστήσει το περιεχόμενό της : ShowWindow ( hwndMain , nCmdShow ) UpdateWindow ( hwndMain )
5

Ξεκινήστε το μήνυμα βρόχο μέσω του παρακάτω κώδικα : Ενώ ( ( gs = GetMessage ( & msg , NULL , 0,0 ) ) ! = 0 ) { DispatchMessage ( & msg ) }
Η
εικόνων