Abrir una ventana [Visualbasic]

Anghios

Hola! estoy usando VB2010, y me gustaría saber un código que me sería muy útil a la creación de mi nuevo programa.

Bien, lo que quiero es que cuando haga click en un botón, te abra una ventana de las que hay en la barra de herramientas. Es decir, si tienes el paint minimizado, con que pongas el título de la ventana en una caja de texto, y le des al botón, te abra la ventana que contiene el nombre de la caja de texto, la verdad es que me urge pero bueno
Gracias!

divitix

[http://www.google.com/search?client=ubuntu&channel=fs&q=visual+basic+ocultar+mostrar+ventana&ie=utf-8&oe=utf-8][0]">[http://www.google.com/search?client=ubu][1] ... 8&oe=utf-8

En ese enlace, encontrarás bastantes ejemplos de como mostrar y ocultar las ventanas..

[0]: <a href=
[1]: http://www.google.com/search?client=ubu

Hawkings

Creo que él se refiere a ocultar o mostrar ventanas ajenas al programa.
Que yo sepa no se puede hacer de un modo fácil, tendrías que usar apis de windows y el código no sería portable de un SO a otro.

jumarras

si lo que quieres hacer es traer a primera plana y activar una ventana, busca info a cerca del aip SETFOREGROUNDWINDOW

Anghios

@jumarras said:

si lo que quieres hacer es traer a primera plana y activar una ventana, busca info a cerca del aip SETFOREGROUNDWINDOW

He encontrado información sobre esa API, y la verdad es que un canteo, no hay ninguno que te lo den "hecho", ningún ejemplo.
El que he podido sacar es este:

Dim Ret As Long
        Dim winWnd As Long


        winWnd = FindWindow(vbNullString, "C:SoftphoneIntegra.htm - Microsoft Internet Explorer")
        MsgBox("The windows id is: " & winWnd)

        If winWnd > 0 Then
            Call ShowWindow(winWnd, 3)

            Call SetForegroundWindow(winWnd)

        Else
            MsgBox("That app is not open.")
        End If


    End Sub

Y como no, tengo subrayado bastantes lineas. Que cagada Ç_Ç Con lo que me hace falta xD

Hawkings

@Anghios said:

Y como no, tengo subrayado bastantes lineas. Que cagada Ç_Ç Con lo que me hace falta xD

Eso de que tienes subrayadas bastantes lineas no lo entiendo xD. Te refieres a que no entiendes cómo se usa? yo no se VB pero creo que lo entiendo, FindWindow devuelve un long que es la ID de la ventana, y si ha conseguido correctamente la id de la ventana devuelve un valor mayor que uno, pero no creo que sea eso no?

Anghios

Si pero los comandos "ShowWindow" no lo reconoce el VB, es decir, lo que está subrayado es que está mal, funcionaría si llamase a la variable ShowWindow, pero tendría que darle otra función U_U

Salvatore

lo meto a tareas pendientes. Si no hay una forma "fácil", creo que a través de la dll del autoit se podrá hacer. Lo miraré.