Visual Basic - evento keypress

Life is soft - evento anual de software empresarial
 
Vista:

evento keypress

Publicado por Cristian (6 intervenciones) el 20/10/2003 22:26:37
Por fa una ayudita
Como es la sintaxis para el evento keypress pero con un texbox de una matriz ya lo he intentado todo pero no me resulta.
Private Sub tcme_KeyPress([0 as integer,]keyascii As Integer)
If keyascii = 13 Then
de ante mano 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

RE:evento keypress

Publicado por Ivan Calderón (76 intervenciones) el 21/10/2003 17:18:10
Que tal? al crear una matriz a cada miembro de la matriz se le asigna un indice lo que necesitas es saber cual es el indice del objeto que recibio el evento algo asi:
Private Sub TxtCedula_KeyPress(Index As Integer, KeyAscii As Integer)
select case index
case 0
if keyascii=13 then
msgbox"La Programación para la primera caja de texto"
end if
case 1
if keyascii=13 then
msgbox"La Programación para la segunda caja de texto"
end if
case 2
if keyascii=13 then
msgbox"La Programación para la tercera caja de texto"
end if
' y asi continuas
end select
'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:Gracias

Publicado por Cristian (76 intervenciones) el 23/10/2003 20:59:44
Hola ,muchas gracias por tu ayuda me ha servido de mucho.............
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:evento keypress

Publicado por Ivan Calderón (76 intervenciones) el 21/10/2003 17:18:33
Que tal? al crear una matriz a cada miembro de la matriz se le asigna un indice lo que necesitas es saber cual es el indice del objeto que recibio el evento algo asi:
Private Sub TxtCedula_KeyPress(Index As Integer, KeyAscii As Integer)
select case index
case 0
if keyascii=13 then
msgbox"La Programación para la primera caja de texto"
end if
case 1
if keyascii=13 then
msgbox"La Programación para la segunda caja de texto"
end if
case 2
if keyascii=13 then
msgbox"La Programación para la tercera caja de texto"
end if
' y asi continuas
end select
end sub
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:evento keypress

Publicado por Cristian (6 intervenciones) el 23/10/2003 21:02:21
gracias me ha sido muy util.

Muchas Gracias
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