Visual Basic - teclado

Life is soft - evento anual de software empresarial
 
Vista:

teclado

Publicado por gonzalo (2 intervenciones) el 27/11/2002 12:53:39
Hola a todos, alguien tiene idea como puedo hacer en vb6 para desactivar el teclado por x segundos.

gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

teclado

Publicado por J2ML (464 intervenciones) el 27/11/2002 16:32:21
¿ Eso como para que ?
1.- A mi se me ocurre que coloques un timer con un interval deseado (este interval está en milisegundos es decir 1000 ms = 1 s), la propiedad enabled=false, luego con un command1 puedes:

Private Sub Command1_Click()
Form1.Enabled = False
Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
Form1.Enabled = True
Timer1.Enabled = False
End Sub

2.- Ahora si lo que en realidad deseas es desactivar el teclado, en el mismo form anterior podrías colocar este otro código:
Dim Band as Boolean

Private Sub Command1_Click()
band=false
Timer1.Enabled = True
End Sub

Private Sub ObjetoDeseado_KeyPress(KeyAscii As Integer)
if not Band then Keyascii=0
End Sub

Private Sub Timer1_Timer()
Form1.Enabled = True
Timer1.Enabled = False
End Sub

Donde el objeto deseado puede ser un botón, cuadro de texto, formulario, etc.. Espero te sirva...!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:teclado

Publicado por GONZALO (2 intervenciones) el 27/11/2002 18:56:06
muchas gracias por tu ayuda, igual te comento que estoy haciendo un sistema con lectoras laser y la idea es que al leer un cod. de barra no me deje leer otro hasta que no pasen 2 o 3 segundos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar