Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Problemas con errorProvider

22/12/2005 - 15:50 por KeyMan | Informe spam
Ayuda Hacer una pregunta
Hola amigos, soy nuevo en el foro Un saludo a todos los miembro

Wueno vamos con la duda.. xDD

Tengo problemas con el uso del errorProvide
Private Sub tbEdad_Validating(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles tbEdad.Validatin
'controlamos la eda
'si no es numéric
If Not IsNumeric(Me.tbEdad.Text) The
'frecuencia con la que parpadeará el ErrorProvide
Me.ErrorProvider.BlinkRate = 20
'siempre parpadeand
Me.ErrorProvider.BlinkStyle = ErrorBlinkStyle.AlwaysBlin
'fijamos el mensaje de erro
Me.ErrorProvider.SetError(Me.tbEdad, "No puedes introducir caracteres"
'si no está entre los valores indicado
Els
Me.ErrorProvider.SetError(Me.tbEdad, ""
'si la longitud introducida en el campo es mayor de
End I
end su
Me gustaría saber en que estoy confundiendome porque no hay manera de solucionar el problema... Da igual que pongas número o caracter porque me da mensaje de erro

Un saludo a todo

KeyMan

Ver este tema: http://www.softwaremix.net/viewtopic-467920.htm

Enviado desde http://www.softwaremix.net
email Siga el debateRespuesta 1 respuestaRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 Lord Voldemort
22/12/2005 - 17:10 | Informe spam
porque mejor no impides que entre datos no deseados o sea letras u otra cosa

pon esto en el evento keypress de tu tbedad

Dim Caracter As Char
Try
'If Asc(e.KeyChar) = Keys.Back Then
e.Handled = False
Exit Sub
End If
'convertir el caracter escrito en el texbox a caracter
Caracter = Convert.ToChar(e.KeyChar)
'si es un digito
If Not Char.IsDigit(Caracter) Then
e.Handled = True
Exit Sub
End If

Catch ex As Exception
Debug.WriteLine(ex.ToString)
End Try

en la propiedad maxlengh de tu control ponle 2 o 3,... 99 o pucha no se
alguien que tenga mas de 100 es raro...


"KeyMan" wrote in message
news:

Hola amigos, soy nuevo en el foro Un saludo a todos los miembros

Wueno vamos con la duda.. xDDD

Tengo problemas con el uso del errorProvider
Private Sub tbEdad_Validating(ByVal sender As Object, ByVal e As
System.ComponentModel.CancelEventArgs) Handles tbEdad.Validating
'controlamos la edad
'si no es numérica
If Not IsNumeric(Me.tbEdad.Text) Then
'frecuencia con la que parpadeará el ErrorProvider
Me.ErrorProvider.BlinkRate = 200
'siempre parpadeando
Me.ErrorProvider.BlinkStyle = ErrorBlinkStyle.AlwaysBlink
'fijamos el mensaje de error
Me.ErrorProvider.SetError(Me.tbEdad, "No puedes introducir
caracteres")
'si no está entre los valores indicados
Else
Me.ErrorProvider.SetError(Me.tbEdad, "")
'si la longitud introducida en el campo es mayor de 3
End If
end sub
Me gustaría saber en que estoy confundiendome porque no hay manera de
solucionar el problema... Da igual que pongas número o caracter porque me
da mensaje de error

Un saludo a todos


KeyMan


Ver este tema: http://www.softwaremix.net/viewtopic-467920.html

Enviado desde http://www.softwaremix.net


Preguntas similares

 

Busqueda sugerida :