Problema con SendKeys Visual Basic

deiv · Mensaje por **deiv** » Vie Mar 17, 2006 9:53 am

Hola. Tengo un problemilla que es que al hacer:
SendKeys "{F1}", True

para que me muestre un menu de ayuda, me lo abre bien, pero me lo deja en segundo plano, detrás del formulario y no se ve si no se minimiza la pantalla principal. Logicamente quiero que se ponga delante. Al pulsar F1 va perfecto.

Pensaba que podría usar el AppActivate, pero si no me equivoco sirve para abrir una aplicación y darle el foco y luego puedes utilizar el SendKeys para pasarle teclas pulsadas, es decir, algo así:

AppActivate "Microsoft Word"
SendKeys "%(e)+(v)", True

Pero no yo abro ninguna aplicación, solo quiero abrir la pantalla de ayuda con el F1
¿Alguien puede ayudarme? Muchas gracias

PatricioPino · Mensaje por **PatricioPino** » Vie Mar 17, 2006 1:18 pm

Esa instruccion como la pones en tu código ? es decir la usas como un evento de algun control ?.
Yo acabo de hacer la prueba asignando esta a un boton y no la deja en segundo plano.

deiv · Mensaje por **deiv** » Lun Mar 20, 2006 8:46 am

Pues tengo una función asi

Public Sub Ayuda(Formulario As Object)

On Error Resume Next
Formulario.HelpContextID = IdAyuda
SendKeys "{F1}", True
DoEvents: DoEvents: DoEvents: DoEvents

End Sub

Lo del DoEvents era por probar.

y en el click de un menu le llamo a esta función

Private Sub mnuAyudaAtencion_Click()
IdAyuda = 5520
Ayuda Me
IdAyuda = 0
End Sub