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.