verficar en un text

oa
23 de Enero del 2004
Hola:

Por favor ayúdenme con esto:

Quiero definir un text en donde el usuario solo
pueda ingresar números, o sea que el ingreso de
caracteres esté bloqueado y viceversa. Además
quisiera saber como en el momento de elegir un
elemento de la lista de un datacombo se pueda borrar,
o sea que solo se pueda elegir un elemento de la lista del datacombo.

Gracias.



lorrich
23 de Enero del 2004
Para lo e que un text solo puedas introducir numeros yo utilizo esto, no se si alguien sabe alguna otra manera, pero a mi me funciona.

Private Sub "NOMBRE DE TU TEXT"_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 13
KeyAscii = 0 ' para que no pite
Case 8, 48 To 57
'Case 8, Asc("0") To Asc("9")
' Sólo admitir teclas consideradas numéricas
' El 8 es la tecla Backspace (borrar hacia atrás)
Case Else
' No es una tecla numérica, no admitirla
KeyAscii = 0
Beep
End Select

Saludos.