elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Introducción a Git (Primera Parte)


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP)
| | | |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo)
| | | | |-+  -
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] 2 Ir Abajo Respuesta Imprimir
Autor Tema: -  (Leído 4,284 veces)
xadap
Visitante


Email
-
« en: 1 Octubre 2005, 19:07 pm »

-


« Última modificación: 1 Septiembre 2021, 08:56 am por __ann » En línea

yeikos


Desconectado Desconectado

Mensajes: 1.424



Ver Perfil
Re: 2 teclas = 1 accion ?
« Respuesta #1 en: 1 Octubre 2005, 21:45 pm »

¿Has probado a poner And en la comparación? si es if, claro...


En línea

xadap
Visitante


Email
-
« Respuesta #2 en: 1 Octubre 2005, 23:08 pm »

-
« Última modificación: 1 Septiembre 2021, 08:56 am por __ann » En línea

Xpeed


Desconectado Desconectado

Mensajes: 472


Res Publica Non Dominetur


Ver Perfil
Re: 2 teclas = 1 accion ?
« Respuesta #3 en: 1 Octubre 2005, 23:13 pm »

pues tambien prodria ser con Or  .... si tal cosa or esta blablavbla


un saludo.
En línea

xadap
Visitante


Email
-
« Respuesta #4 en: 1 Octubre 2005, 23:15 pm »

-
« Última modificación: 1 Septiembre 2021, 08:56 am por __ann » En línea

Xpeed


Desconectado Desconectado

Mensajes: 472


Res Publica Non Dominetur


Ver Perfil
Re: 2 teclas = 1 accion ?
« Respuesta #5 en: 1 Octubre 2005, 23:18 pm »

aaapz jejeje leí mal xD ...... pero con and deberia salir perfecto :S  jejeje bueno será revisar que esté bien el code no?


un saludo.
En línea

....Gusto....


Desconectado Desconectado

Mensajes: 1.804



Ver Perfil
Re: 2 teclas = 1 accion ?
« Respuesta #6 en: 1 Octubre 2005, 23:19 pm »

if numpad8=apretado and numpad 6 = apretado then
blablabla..
end if

if numpad6 = apretado (no se como lo hiciste) then
hace tal cosa
end if

if numpad8 = apretado.........
end if

respeta el orden :D
En línea

.:.~GuStO~.:.

xadap
Visitante


Email
-
« Respuesta #7 en: 2 Octubre 2005, 00:17 am »

-
« Última modificación: 1 Septiembre 2021, 08:56 am por __ann » En línea

Gemu

Desconectado Desconectado

Mensajes: 29


Ver Perfil
Re: 2 teclas = 1 accion ?
« Respuesta #8 en: 2 Octubre 2005, 09:37 am »

crea un variable tipo switch que sea true en el keydown de la tecla y false en el keyup, luego comparas:

dim keynumpad6 as integer
dim keynumpad8 as integer


Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)

If KeyCode = 97 Then
    keynumpad6 = false
end if

If KeyCode = 98 Then
    keynumpad8 = false
End If

End Sub


Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

If KeyCode = 97 Then
    keynumpad6 = true
end if

If KeyCode = 98 Then
    keynumpad8 = true
End If


if keynumpad6 and keynumpad8 then
msgbox("estan las dos teclas presionadas")
end if


End Sub



no se los codigos de las teclas, solo lo hice a modo de ejemplo, ahi tu lo corriges.
otra forma es usar las apis, que tiene funciones para preguntar si X tecla se encuentra presionada o no.

espero que te sirva.
saludos.
En línea

Gemu

Desconectado Desconectado

Mensajes: 29


Ver Perfil
Re: 2 teclas = 1 accion ?
« Respuesta #9 en: 2 Octubre 2005, 09:38 am »

pd: las variables son boolean no integer, sorry ;)
En línea

Páginas: [1] 2 Ir Arriba Respuesta Imprimir 

Ir a:  
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines