Visual Basic - ayuda porfaºº

Life is soft - evento anual de software empresarial
 
Vista:

ayuda porfaºº

Publicado por arturo (31 intervenciones) el 02/02/2004 13:28:21
porfavor diganme como hago para que en un textbox ingrese solo letras y no numeros.
si alguien tiene el codigo fuente porfavor digamelo

gracias de antemano
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:ayuda porfaºº

Publicado por Pedro Luis (878 intervenciones) el 02/02/2004 17:19:08
En el Keypress de la caja de texto debes poner algo así
If Chr(KeyAscii) >= 0 And Chr(KeyAscii) <= 9 Then KeyAscii = 0
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:ayuda porfaºº

Publicado por Fabian (501 intervenciones) el 02/02/2004 17:54:24
En tu modulo coloca esto:
Public Function SoloLetras(ByVal KeyAscii As Integer) As Integer
If InStr("abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ", Chr(KeyAscii)) = 0 Then
SoloLetras = 0
Else
soloLetras = KeyAscii
End If
If KeyAscii = 8 Then SoloLetras = KeyAscii ' borrado atras
If KeyAscii = 13 Then SoloLetras = KeyAscii ' return
End Function
Y en el evento KeyPress de cada Caja de Texto pones esto:
KeyAscii=SoloLetras(KeyAscii)
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
sin imagen de perfil
Val: 119
Ha disminuido 1 puesto en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

RE:ayuda porfaºº

Publicado por christian (713 intervenciones) el 04/02/2004 00:45:19
hay una funcion
isnumeric(text1.text)
busca bien en la ayuda que la tenes
si escribis algun numero le decis que haga lo que quieras
lo podes agregar change del text
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