Mantener Control "Ctrl" precionado

[leandro_ortega]

Hola... me precento aqui como un programador viejo casi veterano xd... pero la cosa es q me jui al vicio de los juegos y ahora q necesito hacer un programa toy en 0 ...

he visto este comando:

SendKeys.Send(”{tab}”)

pero no se como se hace para la tecla Control o "Ctrl"
como les guste llamarlo ...
intente hacer algo haci

SendKeys.Send(^)

pero no funciono

y otra cosa es q necesito q paresca q quede precionado, como si fuece q presiono la tecla y no la soltara ...

de antemano muchas gracias...

Salu2!

[boluart]

Aqui hay un hilo que te puede ayudar

http://www.forosdelweb.com/f69/simul...etecte-472829/

[leandro_ortega]

muhcas gracias por tu respuesta ahora veo el link q me pasaste... estoy con una amiga en el msn

Salu2!

[leandro_ortega]

ben ta mejorcito q el anterior codigo con el q trate de usar...

ahora toy usando haci...

Public Class Form1

Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Const KEYEVENTF_KEYUP = &H2
Const VK_LWIN = &H5B


Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

Call keybd_event(38, 0, 0, 0)
Call keybd_event(38, 0, KEYEVENTF_KEYUP, 0)

'Call keybd_event(VK_LWIN, 0, 0, 0)
'Call keybd_event(VK_LWIN, 0, KEYEVENTF_KEYUP, 0)

Timer1.Enabled = False

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Timer1.Enabled = True

End Sub
End Class

eso probe en el vb2005 y me funcione bien... pero una preguntita q parte del codigo

Call keybd_event(38, 0, 0, 0)
Call keybd_event(38, 0, KEYEVENTF_KEYUP, 0)

modifico para q me apriete el "Ctrl" el 38?

Muchas gracias...

Salu2!

EDD: mmm como soy curioso movi algunas cosas y me di cuenta q

q estas constantes son las q dicen q teclas

Const KEYEVENTF_KEYUP = &H2
Const VK_LWIN = &H5B

ahora voy a tratar de buscar la traduccion de Ctrl a eso codigo

[leandro_ortega]

ammm una preguntita como se llaman estos caracteres???

&H5B

Salu2!

[leandro_ortega]

muchas gracias boluart

por tu ayuda me facilitaste todo logre hacerlo nomas xd

Public Class Form1

Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Const KEYEVENTF_KEYUP = &H2
Const VK_Ctrl = &H11


Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

Call keybd_event(VK_Ctrl, 0, 0, 0)
Call keybd_event(VK_Ctrl, 0, KEYEVENTF_KEYUP, 0)


Timer1.Enabled = False

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Timer1.Enabled = True

End Sub
End Class

Salu2!

[boluart]

Bueno no me diste tiempo a responder...
a y espero que te haya ido bien con tu amiga del msn

hay dos tipos de eventos cuando se presiona una tecla

El KeyDown que es cuando se preciona
El KeyUp que es cuando se suelta

por eso es que se llama al evento keybd_event dos veces.
La primera es para que empiece a precionar y la segunda para que deje de precionar

Call keybd_event(38, 0, 0, 0) ' KeyDown
Call keybd_event(38, 0, KEYEVENTF_KEYUP, 0) ' KeyUp

si mal no recuerdo tu querias que se quede precionado entonces tendrias que llamar solo una vez (solo la primera vez - KeyDown)

y es cierto el parametro 38 es el codigo ascii de la tecla a precionar en el ejemplo si mal no recuerdo es la flecha de desplazamiento hacia arriba (espero no equivocarme), en tu caso tendrias que cambiar el 38 por el codigo ascii de la tecla Ctrl.

Espero que haya quedado todo claro.
Saludos

[seba123neo]

Hola,la verdad no te recomiendo que hagas eso ,te puede quedar la tecla apretada todo el tiempo si no le pones el evento para que suba la tecla te quedara apretada,y es un desastre,tendrias que reiniciar la pc para que se reestablesca..es como simular n click con el mouse,siempre tenes qeu poner el down,y despues el up,si no llegas a poner el up inmaginate el pobre mouse apretado todo el tiempo,hay que tener cuidado en eso...

saludos.

[leandro_ortega]

mmmm hola ...

se destraba con solo presionar la tecla...

Salu2!