Visual Basic - Duda de principiante!!

Life is soft - evento anual de software empresarial
 
Vista:

Duda de principiante!!

Publicado por superkoko (1 intervención) el 10/03/2002 19:31:27
Hola a todos. Mi problema es este:

He creado una aplicacion de gestion en la k se utiliza mucho el teclado numerico para controlar los calculos, al estilo de una calculadora. He programado ya el evento keyup con todos los numeros de el t. numerico, pero al intentar programar el enter (k si no me ekivoco solo se puede hacer en el keypress) pues no me hace caso, simpre k lo presiono ejecuta el boton k tenga el foco en ese momento. Tego activado el keypreview del formulario, y he probado a poner el boton k contiene el evento k kiero k ejecute el enter como default, pero no funcionó.

El codifo del keypress del FORM es el siguiente:

Select case keyascii
case 13
msgbox "funciona"
end select

Gracias a todos, me urge la respuesta
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:Duda de principiante!!

Publicado por Pedro (43 intervenciones) el 11/03/2002 20:35:30
Private Sub textaño_KeyPress(KeyAscii As Integer)
Dim tec As Integer
tec = KeyAscii
Select Case tec
Case Is = 13
' aquí pones lo que quieras que te haga al presionar
' enter
End Select
End Sub

Un saludo.
Pedro
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:Duda de principiante!!

Publicado por Olivier (3 intervenciones) el 12/03/2002 11:56:51
Para que te envie el foco en el tab que tienes predeterminado use el siguiente codigo:(con este codigo no sonara el beep prederminado)

If KeyAscii = 13 Then
KeyAscii = 0
SendKeys "{tab}"
End If

si quieres enviarlo a un lugar especifico haga:(pero sonara el beep)

If KeyAscii = 13 Then
KeyAscii = 0
ellugar.setfocus
End If
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