Autor
|
Tema: Funcion con la tecla "U" (Leído 1,570 veces)
|
nahueld
Desconectado
Mensajes: 53
<NEWBIE>
|
Hola miren, yo queria saber como se puede hacer, para que la tecla "U" este constantemente apretandose , tambien con un timer para que tenga un intervalo... , osea seria algùn tipo de macro,el que tenga alguna idea que me la diga asi intento ver como se hace
gracias chicos, nahuel
|
|
|
En línea
|
|
|
|
seba123neo
|
Hola,pues podes usar la famosa SendKeys que mande constantemente esa tecla,en un timer con el intervalo que quieras,o con la api keybd_event,algo asi: Const KEYEVENTF_KEYUP = &H2 Const KEYEVENTF_EXTENDEDKEY = &H1 Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Sub MandarTeclaU(Tecla As Long) Call keybd_event(Tecla, 0, 0, 0) Call keybd_event(Tecla, 0, KEYEVENTF_KEYUP, 0) End Sub
Private Sub Timer1_Timer() Call MandarTeclaU(vbKeyU) End Sub saludos.
|
|
|
En línea
|
|
|
|
nahueld
Desconectado
Mensajes: 53
<NEWBIE>
|
Ahora pruebo ese codigo y te aviso, igual no entendi lo de sendkey
Gracias, sos re amable.
|
|
|
En línea
|
|
|
|
SERBice
|
jajaja..... tios, estas creando un macro para el video juev Argentum Online???? hace poco pregntaset por e click, ahora por la U, son teclas usadas en ese juego, por eso lo suspicas de mi mensaje jejeje.... en fin, si es asi me interesaria ver tu trabajo.
|
|
|
En línea
|
|
|
|
nahueld
Desconectado
Mensajes: 53
<NEWBIE>
|
Jaj si :$, sori pero. Me cuesta hacerlos! es que me encanta yo sinceramente admiro a Ustdes, pagaria, haria cualquier cosa para saber lo que sabèn, me Gusta tanto esto, lastima que no se aplicarlo, gracias amigo y espero que no te moleste ! suerte
|
|
« Última modificación: 21 Abril 2008, 22:27 pm por nahueld »
|
En línea
|
|
|
|
SERBice
|
mejor borra tu mail de ese post, no querras que un bot tome tu mail y envie spam.
ademas no es correcto postear mails, para es esta tu perfil.
si lo deseas pudo adrte una mano con esa macro.
|
|
|
En línea
|
|
|
|
|
|