

| |||
¿como ocultar una ventana que no sea de visual basic? ![]() ![]() |
| |||
Respuesta: ¿como ocultar una ventana que no sea de visual basic? Haber... lo que quieres es ocular ventanas de aplicaciones externas a la tuya? Si es asi: puedes usar algunas APIs de windows, para ello lo primero que debes hacer es obtener el handle (Identificador unico de la ventana) para poder ocultarlo, para ello puedes usar FindWindow, y para ocultarlo si no me equivoco puedes usar ShowWindow, claro que a esta ultima API tienes que pasarle el handle obtenido. haber si este codigo te ayuda:
Código:
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long Private Sub Command1_Click() 'ocultar Dim mWnd As Long mWnd = FindWindow("Notepad", vbNullString) If mWnd <> 0 Then ShowWindow mWnd, 0 End If End Sub Private Sub Command2_Click() 'mostrar Dim mWnd As Long mWnd = FindWindow("Notepad", vbNullString) If mWnd <> 0 Then ShowWindow mWnd, 1 End If End Sub
__________________ Vivir para ser buenos y ser buenos para servir mejor. |