Visual Basic - TEXBOX, ¿cual es el código Ascii del punto?

Life is soft - evento anual de software empresarial
 
Vista:

TEXBOX, ¿cual es el código Ascii del punto?

Publicado por Pedro (26 intervenciones) el 27/03/2003 19:02:19
Hola a todos:
Tengo un formulario con varios TextBox y en algunos de ellos quiero limitar la entrada de datos únicamente a números y puntos. Sé como se restringe el TextBox a admitir sólo números (en el evento KeyPress), pero no se hacer que también admita el punto, para por ejemplo utilizar el textbox para introducir el D.N.I. con los dos puntos que separan los millones y los miles (55.555.555).
¿Alguien me puede decir cual es el código Ascii del punto?
A modo de referencia, el código que utilizo es el siguiente:

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If KeyAscii < Asc("0") Or KeyAscii > Asc("9") Then
If KeyAscii <> 8 Then ' este es el Backspace
KeyAscii = 0
End If
End Sub

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:TEXBOX, ¿cual es el código Ascii del punto?

Publicado por Esteban (1144 intervenciones) el 27/03/2003 19:22:00
Si ya usas el Asc, porqué no lo buscas con el mismo Asc(".")??????????????????????????????????????????????
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:TEXBOX, ¿cual es el código Ascii del punto?

Publicado por Pedro (26 intervenciones) el 27/03/2003 19:44:12
Te importaría decirme como se hace, soy aficionado pero no he estudiado V.B., el código lo copié de otro colaborador del foro, y lo cierto es que no sé como hacerlo. ¿Me puedes poner el código?
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

RE:TEXBOX, ¿cual es el código Ascii del punto?

Publicado por manuel (87 intervenciones) el 27/03/2003 20:11:38
el codigo ascci es 46
saludos, trabaja en el evento keypress para ver el valor de cada tabla pulsada, saludos
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:TEXBOX, ¿cual es el código Ascii del punto?

Publicado por manuel (87 intervenciones) el 27/03/2003 20:15:53
esto es un ejemplo
Private Sub txtNombre_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 34, 39, 44,46
KeyAscii = 0
Case Else
KeyAscii = Asc(UCase(Chr(KeyAscii)))
End Select
End Sub
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

¡¡GRACIAS!!

Publicado por Pedro (26 intervenciones) el 27/03/2003 21:18:35
GRACIAS, ME HA SIDO DE GRAN AYUDA...
SALUDOS
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 Esteban (1144 intervenciones) el 28/03/2003 04:29:39
Esta bien, veo que no sabes, pero si tienes funciones como Asc(...) creo que y espero que lo mínimo que hagan es buscar en la ayuda, yo no soy un superdotado, pero sí tengo el "gusanito" de la investigación, y por eso la ayuda me ha sido de extrema importancia.

Suerte en tu aprendizaje, y por cierto, sigue buscando ejemplos, así aprendí.
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