Aprire Visual Basic 6 . Fare clic su " EXE standard " nella finestra "Nuovo progetto" e fare clic su "Apri " per creare un progetto con un modulo.
2
Fare clic su " Progetto" nel menu e quindi fare clic su " Aggiungi modulo ". Fare clic sul pulsante "Apri" nella finestra di dialogo " Aggiungi modulo " che si apre per aggiungere un modulo al progetto e aprire la finestra del codice
3
Digitare quanto segue : .
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'istruzione Declare fa un riferimento alla libreria esterna user32 , che contiene la funzione SetWindowPos .
4
Aprire il Form_Load ( ) la finestra del codice per Form1 e tipo il seguente :
Dim windowPosition As Long
windowPosition = SetWindowPos ( Form1.hWnd , -1 , 0 , 0 , 0 , 0 , 1 ) per
Questo codice chiama la funzione dichiarata nel modulo e imposta Form1 per apparire sempre come l'oggetto di cui il progetto viene eseguito .
5
costruire il resto del progetto. Premere il tasto " F5 " per testare e vedere che la forma rimane sempre in primo piano .
Programmazione © www.354353.com