comment
IRC Chat
play_arrow
Este sitio utiliza cookies propias y de terceros. Si continúa navegando consideramos que acepta el uso de cookies. OK Más Información.

Solo numeros en un Texbox

  • 0 Respuestas
  • 1298 Vistas

0 Usuarios y 1 Visitante están viendo este tema.

Conectado ANTRAX

  • *
  • Administrator
  • Mensajes: 5331
  • Actividad:
    45%
  • Reputación 30
  • ANTRAX
    • Ver Perfil
    • Underc0de
    • Email
  • Skype: underc0de.org
  • Twitter: @Underc0de
« en: Julio 26, 2010, 11:15:30 am »
Código: Visual Basic
  1. Function SoloNumeros(ByVal KeyAscii As Integer) As Integer
  2.       ' Intercepta un codigo ASCII recibido admitiendo solamente
  3.      ' caracteres numéricos, además:
  4.      ' cambia el punto por una coma
  5.      ' acepta el signo -
  6.      
  7.       ' deja pasar sin afectar si recibe tecla de borrado o return
  8.       If KeyAscii = Asc(".") Then KeyAscii = Asc(",")
  9.        If InStr("0123456789.,-", Chr(KeyAscii)) = 0 Then
  10.           SoloNumeros = 0
  11.          Else
  12.           SoloNumeros = KeyAscii
  13.         End If
  14.         ' teclas especiales permitidas
  15.        If KeyAscii = 8 Then SoloNumeros = KeyAscii  borrado atras
  16.        
  17.     End Function
  18.  
  19.  
  20. Private Sub txtvalor_KeyPress(KeyAscii As Integer)
  21. KeyAscii = SoloNumeros(KeyAscii)
  22. End Sub  
« Última modificación: Julio 08, 2011, 10:21:44 am por ANTRAX »


 

¿Te gustó el post? COMPARTILO!



Proceso repetido, finalizar hasta dejar uno solo

Iniciado por ANTRAX

Respuestas: 0
Vistas: 1312
Último mensaje Julio 26, 2010, 01:48:37 pm
por ANTRAX
Ejecutar un solo ejemplar de un programa

Iniciado por ANTRAX

Respuestas: 0
Vistas: 1364
Último mensaje Julio 26, 2010, 10:19:50 am
por ANTRAX
Proceso Inverso: Ordenar los Numeros de un TextBox en forma Descendente

Iniciado por ANTRAX

Respuestas: 0
Vistas: 1625
Último mensaje Julio 26, 2010, 12:34:30 pm
por ANTRAX
Ordenar Números de un TextBox en Forma Ascendente

Iniciado por ANTRAX

Respuestas: 0
Vistas: 1577
Último mensaje Julio 26, 2010, 12:33:28 pm
por ANTRAX
Otra Forma Para Ingresar Solo Numeros

Iniciado por ANTRAX

Respuestas: 0
Vistas: 1304
Último mensaje Julio 26, 2010, 11:16:54 am
por ANTRAX