rocio_sh
08 de Junio del 2004

necesito paso a paso lo que debe hacer para encender un foco desde visual que alguien me ayudeeeeeeeeee

peris
08 de Junio del 2004

pa que quieres prenderlo con vb si te lo metes en
culo tambine ensiende

hullo
08 de Junio del 2004

ey solo pa decirte que si buscas ayuda no te metas
piunchi foro solo no sirve

yachar
08 de Junio del 2004

peris/hullo/accouztic....como te quieras llamar, xq no tratas de ayudar o te vas de este foro??

rocio que es lo q quieres exactamente??
te refieres al metodo setFocus()??

al
08 de Junio del 2004

Hola Rocio !!
Puedes ir a www.allapi.net y mirar las apis Getfocus y setfocus pero he de decirte que la mejor API para obtener el handle de la ventana activa es Setforegroundwindow que esta en esa misma pagina web.

haz esto:

en un modulo: Declara la API
Public Declare Function GetForegroundWindow Lib "user32" () As Long

en un boton(o donde lo quieras hacer :
declara un long que guarde el handle de la ventana activa:

Dim hwnd as long

y luego haz:

hwnd = GetForegroundWindow()

si quieres ver si te coge bien el handle visualizalo:

text1.text = hwnd


Espero que esto te sirva.

Mucha suerte!!