Visual Basic 6 inte har en funktion som automatiskt håller ett formulär som den översta fönstret på skärmen , men du kan använda en modul för att förklara SetWindowPos API-funktionen och referera till den i ditt projekt . Medan programmet körs , håller formen ovanpå allt : andra former som ingår i samma projekt och alla andra program som körs samtidigt . Även om formen stannar på toppen av allt annat , kan användaren fortfarande ändra dess storlek eller flytta runt på skärmen . Instruktioner
1
Öppna Visual Basic 6 . Klicka på " Standard EXE " i " New Project "-fönstret och klicka på " Öppna " för att skapa ett projekt med ett formulär .
2
Klicka på " Projekt " i menyn och klicka sedan på " Lägg till modul . " Klicka på " Öppna " -knappen på " Add Module " i dialogrutan som öppnas för att lägga till en modul till projektet och öppna sin kod fönster
3
Skriv följande : .
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
Deklarera uttalande gör en hänvisning till den externa User32 biblioteket , som innehåller SetWindowPos funktionen .
4
Öppna Form_Load ( ) kod fönstret för Form1 och typ följande :
Dim windowPosition As Long
windowPosition = SetWindowPos ( Form1.hwnd , -1 , 0 , 0 , 0 , 0 , 1 ) katalog
Denna kod anropar funktion som deklareras i modulen och sätter Form1 att alltid framstå som det översta objektet när projektet löper .
5
bygga resten av projektet . Tryck " F5 " för att testa det och se till att formuläret alltid är på topp .
