In Windows-toepassingen , functie event procedures op basis van een programma lus genaamd " event loop" of " boodschap pomp . " Het systeem voegt berichten , informatie voorwerpen die numerieke code , in een Message Queue tijdje diverse evenementen plaatsvinden , zoals de muis te klikken of te typen . Het systeem voldoet aan alle input voor een aanvraag bij de diverse ramen in de applicatie . Elk venster heeft een functie genaamd " vensterprocedure . " The vensterprocedure processen ingang en geeft de controle van het systeem . U kunt een bericht pomp maken met de GetMessage en DispatchMessage functies . Wat je nodig hebt VB.NET Toon Meer Aanwijzingen Klik 1 " Start", " Alle programma's " en " Visual Studio " aan de Integrated Development Environment openen ( IDE. ) Klik op " File " en " nieuw " om een nieuw project aan te maken . Klik op de " Visual Basic " icoon om het type applicatie uit te breiden op het linkerpaneel van het dialoogvenster . Selecteer " Windows Form Application " in het rechtervenster . Voer een naam voor het project . Geef een locatie voor het project bestanden door te klikken op " Bladeren . " Kopen van 2 Klik op " Form1.vb " op de Solution Explorer om het venster code in te voeren . Definieer de variabelen : Dim hinst AS HINSTANCEDim hwnd AS HWNDDim msg AS MSGDim wc AS WNDCLASS 3 Voer de volgende code tussen Sub WinMain en End Sub : wc.hinstance = hInstancewc . . lpszMenuName = " MainMenu " wc.laszClassName = " MainWndClass " Deze code registreert het venster klasse voor het hoofdvenster 4 Maak de belangrijkste vensters via code : hwndMain = CreateWindow ( " MainWndClass " , "Voorbeeld" , WS_OVERLAPPEDWINDOW , hInstance ) tonen het venster en maken de inhoud ervan : ShowWindow ( hwndMain , nCmdShow ) UpdateWindow ( hwndMain ) 5 Start het bericht lus via de volgende code : Terwijl ( ( gs = GetMessage ( & msg , NULL , 0,0) ) ! = 0 ) { DispatchMessage ( & msg ) }
|