numero o letra?

alguien me puede mandar un ejemplito de como verificar en un textbox si
es que se ha escrito una letra??..me explico es un textbox donde solo
se ingresan numeros...pero yo quiero q al momento de ingresar una letra me
salga el aviso de q solo permiten numeros

Hola Lucho,

perdona que me meta, pero humildemente pienso que tu aportación tiene
grandes riesgos, ya que acepta caracteres tildados, con diéresis, signos de
puntuación y ortográficos, etc.
Efectivamente, los números también los trata, pero trata también otros
caracteres que pueden entrañar un riesgo en la ejecución de la aplicación.

Creo que una aproximación de lo que se quiere sería:


Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As
System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
If Char.IsDigit(e.KeyChar) = False Then
MessageBox.Show("Debe insertar sólo números")
e.Handled = True
End If
End Sub


Un saludo.
Jorge Serrano Pérez
Microsoft MVP VB.NET
PortalVB.com
http://www.portalvb.com/
Weblog de Jorge Serrano
http://weblogs.golemproject.com/jorge/


"lucho" wrote:

> Private Sub txtNumero_KeyPress(ByVal sender As Object, ByVal e As
> System.Windows.Forms.KeyPressEventArgs) Handles txtNumero.KeyPress
> Dim Tecla As String = UCase(e.KeyChar)
> Dim Alfabeto As String = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
> Dim Found As Int16
> Found = InStr(Alfabeto, Tecla)
> If Found <> 0 Then
> MsgBox("este campo debe ser numérico")
> e.Handled = True
> End If
> End Sub
>
>
> "Default" wrote:
>
> >
> > alguien me puede mandar un ejemplito de como verificar en un textbox si es
> > que se ha escrito una letra??..me explico es un textbox donde solo se
> > ingresan numeros...pero yo quiero q al momento de ingresar una letra me
> > salga el aviso de q solo permiten numeros
> >
> >
> >
> >

No hay problema. Crítica aceptada. Estamos siempre para aprender.
Lucho.


"Jorge Serrano [MVP VB]" wrote:

> Hola Lucho,
>
> perdona que me meta, pero humildemente pienso que tu aportación tiene
> grandes riesgos, ya que acepta caracteres tildados, con diéresis, signos de
> puntuación y ortográficos, etc.
> Efectivamente, los números también los trata, pero trata también otros
> caracteres que pueden entrañar un riesgo en la ejecución de la aplicación.
>
> Creo que una aproximación de lo que se quiere sería:
>
>
> Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As
> System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
> If Char.IsDigit(e.KeyChar) = False Then
> MessageBox.Show("Debe insertar sólo números")
> e.Handled = True
> End If
> End Sub
>
>
> Un saludo.
> Jorge Serrano Pérez
> Microsoft MVP VB.NET
> PortalVB.com
> http://www.portalvb.com/
> Weblog de Jorge Serrano
> http://weblogs.golemproject.com/jorge/
>
>
> "lucho" wrote:
>
> > Private Sub txtNumero_KeyPress(ByVal sender As Object, ByVal e As
> > System.Windows.Forms.KeyPressEventArgs) Handles txtNumero.KeyPress
> > Dim Tecla As String = UCase(e.KeyChar)
> > Dim Alfabeto As String = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
> > Dim Found As Int16
> > Found = InStr(Alfabeto, Tecla)
> > If Found <> 0 Then
> > MsgBox("este campo debe ser numérico")
> > e.Handled = True
> > End If
> > End Sub
> >
> >
> > "Default" wrote:
> >
> > >
> > > alguien me puede mandar un ejemplito de como verificar en un textbox si es
> > > que se ha escrito una letra??..me explico es un textbox donde solo se
> > > ingresan numeros...pero yo quiero q al momento de ingresar una letra me
> > > salga el aviso de q solo permiten numeros
> > >
> > >
> > >
> > >