Cómo poner una ventana de WINDOWS en la parte superior en programación vb

Opción explícita

Const privada HWND_TOPMOST = -1

Const privada HWND_BOTTOM = 1

Const privada HWND_NOTOPMOST = -2

Const privada SWP_NOSIZE = amp; H1

Const privada SWP_NOMOVE = amp; H2

Const privada SWP_NOZORDER = amp; amp;H10

Const privada SWP_SHOWWINDOW = amp;H40

Const privada SWP_HIDEWINDOW = amp;H80

Función de declaración privada SetWindowPos Lib "user32" (ByVal hWnd As Long, ByVal hWndInsertAfter As Long, ByVal

SetWindowPos Me.hWnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOACTIVATE o SWP_SHOWWINDOW o SWP_NOSIZE o SWP_NOMOVE'Top

End Sub

Private Sub Command2_Click()

SetWindowPos Me.hWnd, HWND_NOTOPMOST, 0, 0, 0, 0, SWP_NOACTIVATE O SWP_SHOWWINDOW O SWP_NOSIZE O SWP_NOMOVE'No fijado

End Sub

Solo consíguelo El identificador de la ventana es suficiente

whWnd es el identificador de la ventana

SetWindowPos whWnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOACTIVATE O SWP_SHOWWINDOW O SWP_NOSIZE O SWP_NOMOVE'arriba