¿Cómo mostrar el formulario vb en la parte superior?
Entonces, ¿cómo mantengo mi ventana en la parte superior? Al mismo tiempo, ¿no afecta el funcionamiento general del programa?
Esto se puede hacer fácilmente usando la función API SetWindowPos.
SetWindowPos se utiliza para completar la función de configurar la posición y el estado de la ventana (pos=posición). El código fuente es el siguiente:
Opción Explícita
Función de Declaración Privada 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
Private Const HWND_TOPMOSTamp;= -1
' Coloque la ventana en la parte superior de la lista y en la parte superior de cualquier Frente de ventana
Private Const SWP_NOSIZEamp; = amp;H1
' Mantener el tamaño de la ventana
Private Const SWP_NOMOVEamp = amp;H2
'Mantener posición de la ventana
Private Sub Form_Load()
SetWindowPos Me.hwnd, HWND_TOPMOST, 0, 0, 0, 0, 0, SWP_NOMOVE o SWP_NOSIZE
' Establecer la ventana para que esté delante de todas las ventanas
Finalizar suboperación