Visual Basic 6 n'a pas de fonction qui maintient automatiquement une forme que la fenêtre au premier plan sur l'écran , mais vous pouvez utiliser un module pour déclarer la fonction API SetWindowPos et le référencer dans votre projet. Alors que le programme s'exécute, la forme reste au-dessus de tout : d'autres formes qui font partie du même projet et tous les autres programmes en cours d'exécution dans le même temps . Même si la forme reste au-dessus de tout le reste, l'utilisateur peut toujours modifier la taille ou la déplacer sur l'écran. Instructions 1 Ouvrez Visual Basic 6 . Cliquez sur " EXE standard " dans le " New Project " fenêtre et cliquez sur «Ouvrir» pour créer un projet avec un formulaire. Cliquez sur "Project" 2 dans le menu puis cliquez sur " Ajouter un module . " Cliquez sur le bouton "Ouvrir " dans la boîte " Ajouter un module " de dialogue qui s'ouvre pour ajouter un module au projet et ouvrir la fenêtre de code 3 Type de ce qui suit: . < p> Option Explicit Declare Function SetWindowPos Lib " user32 " ( ByVal hwnd As Long , ByVal hWndInsertAfter As Long , ByVal x As Long , ByVal y As Long , ByVal cx As Long , ByVal cy As Long , ByVal wFlags As Long ) As Long l'instruction Declare fait une référence à la bibliothèque externe user32 , qui contient la fonction SetWindowPos . 4 Ouvrez le Form_Load () fenêtre de code pour Form1 et le type ce qui suit: windowPosition As long windowPosition = SetWindowPos ( Form1.hwnd , -1, 0, 0, 0, 0, 1) Ce code appelle la fonction déclarée dans le module et définit Form1 pour apparaître toujours comme l'objet du dessus lorsque le projet est exécuté. 5 construire le reste du projet. Appuyez sur la touche "F5 " de le tester et de voir que la forme reste toujours au top.
|