FORMATEAR LOS TEXTBOX

hola, soy luis heredia de santo domingo...
la primer pregunta es facil, solo tienes ke hacer lo siguiente :

en el evento del keypress del texbox debes poner lo siguiente:

If e.KeyChar.IsDigit(e.KeyChar) Then
e.Handled = False
ElseIf e.KeyChar.IsControl(e.KeyChar) Then
e.Handled = False
Else
e.Handled = True
End If
y ya

en lo que consierne al segundo, yo preguntaba eso mismo, pero nadie me decia
nada, asi que encontre un codigo de un amigo que me ayudo bastante y lo uso
con mucha frecuencia, el codigo es el siguiente:

If Len(Me.txtFecha.Text) = 2 And Not e.KeyCode = Keys.Back And Not
e.KeyCode.Delete Then
Me.txtFecha.Text = Trim(Me.txtFecha.Text + "/")
Me.txtFecha.SelectionStart = Len(Me.txtFecha.Text)
elseIf Len(Me.txtFecha.Text) = 5 And Not e.KeyCode = Keys.Back And Not
e.KeyCode.Delete Then
Me.txtFecha.Text = Trim(Me.txtFecha.Text + "/")
Me.txtFecha.SelectionStart = Len(Me.txtFecha.Text)
End If

ahora te explico:
aunque no se van a ver los "/" en el texto, cuando digites el dia 16 luego
se pondra el "/", luego pones el mes 09 luego se pondra el "/" y luego pones
el año 2005 y listo, y otra cosa le pones al textbox
"Jose Maldonado" wrote:

Tengo 2 textbox y quiero que en cada uno solo se pueda digitar lo que
compete:

En el primer textbox quiero se pueda digitar numero y nada mas que eso, que
al momento que yo presiona algun caracter que no numero ni permita verlo.

En el segundo textbox quiero se pueda digitar una fecha y nada mas que eso
, que el textbox tenga los caracteres que separan los meses de los dias y de
los años " / / ".


De antemano agradezo la ayuda


J.M.

Te agradezco la ayuda , una ultima cosa , en el texbox numerico tienes la
manera de controlar si el textbox es numerico con separadores de miles y
decimales???.

Gracias por la ayuda

J.M.

"kavallo" escribió en el mensaje
news:

hola, soy luis heredia de santo domingo...
la primer pregunta es facil, solo tienes ke hacer lo siguiente :

en el evento del keypress del texbox debes poner lo siguiente:

If e.KeyChar.IsDigit(e.KeyChar) Then
e.Handled = False
ElseIf e.KeyChar.IsControl(e.KeyChar) Then
e.Handled = False
Else
e.Handled = True
End If
y ya

en lo que consierne al segundo, yo preguntaba eso mismo, pero nadie me

decia

nada, asi que encontre un codigo de un amigo que me ayudo bastante y lo

uso

con mucha frecuencia, el codigo es el siguiente:

If Len(Me.txtFecha.Text) = 2 And Not e.KeyCode = Keys.Back And Not
e.KeyCode.Delete Then
Me.txtFecha.Text = Trim(Me.txtFecha.Text + "/")
Me.txtFecha.SelectionStart = Len(Me.txtFecha.Text)
elseIf Len(Me.txtFecha.Text) = 5 And Not e.KeyCode = Keys.Back And Not
e.KeyCode.Delete Then
Me.txtFecha.Text = Trim(Me.txtFecha.Text + "/")
Me.txtFecha.SelectionStart = Len(Me.txtFecha.Text)
End If

ahora te explico:
aunque no se van a ver los "/" en el texto, cuando digites el dia 16 luego
se pondra el "/", luego pones el mes 09 luego se pondra el "/" y luego

pones

el año 2005 y listo, y otra cosa le pones al textbox
"Jose Maldonado" wrote:

> Tengo 2 textbox y quiero que en cada uno solo se pueda digitar lo que
> compete:
>
> En el primer textbox quiero se pueda digitar numero y nada mas que eso,

que

> al momento que yo presiona algun caracter que no numero ni permita

verlo.

>
> En el segundo textbox quiero se pueda digitar una fecha y nada mas que

eso

> , que el textbox tenga los caracteres que separan los meses de los dias

y de

> los años " / / ".
>
>
> De antemano agradezo la ayuda
>
>
> J.M.
>
>
>