Visual Basic 6 no tiene una función que mantiene automáticamente una forma como la ventana superior de la pantalla , pero se puede utilizar un módulo para declarar la función API SetWindowPos y hacer referencia a él en su proyecto. Mientras se ejecuta el programa , la forma se mantiene por encima de todo : otras formas que son parte de un mismo proyecto y otros programas que se ejecutan al mismo tiempo. A pesar de que la forma se mantiene en la cima de todo lo demás, el usuario puede cambiar el tamaño o mover por la pantalla. Instrucciones
1
Abra Visual Basic 6. Haga clic en " EXE estándar " en el " Nuevo proyecto " y haga clic en "Abrir " para crear un proyecto con un formulario.
2 Haga clic en " proyecto" en el menú y luego haga clic en " Agregar módulo . " Haga clic en el botón "Abrir " en la casilla " Agregar módulo " de diálogo que se abre para agregar un módulo al proyecto y abrir la ventana de código
3
Escriba lo siguiente : .
< p> Option Explicit Declare Function
SetWindowPos Lib " user32 " ( ByVal hwnd As Long , hWndInsertAfter ByVal As Long , ByVal x As Long , ByVal y As Long , ByVal As Long cx , cy ByVal As Long , ByVal wFlags As Long ) As Long
la instrucción Declare hace una referencia a la biblioteca externa user32 , que contiene la función SetWindowPos .
4
Abra el Form_Load () ventana de código de Form1 y tipo lo siguiente:
windowPosition Dim As Long
windowPosition = SetWindowPos ( Form1.hWnd , -1, 0 , 0, 0 , 0, 1) spanish
Este código llama al función declarada en el módulo y establece Form1 para aparecer siempre como el objeto superior cuando el proyecto se ejecuta .
5
construir el resto del proyecto. Pulse la tecla "F5 " para probarlo y ver que la forma se mantiene siempre en la parte superior .