alguien sabe como???

Una forma sería evaluando el evento KEYPress. De tal forma que evaluas cada
vez que el usuario pulsa una tecla. Si la tecla es el punto entonces colocas
una bandera para que esto no se repita.

e.keyChar= "codigo asccii del punto"

"Karlos Traveceras" escribió:

Mis estimados..

Necesito q en un texbox solo exista la posibilidad de ingresar varios
caracteres pero un solo punto. es decir . q pueda escribirse el punto ( .
), pero q una vez escrito ya no se pueda escribir ningun punto mas.. pero si
otros caracteres..

Espero haberme explicado..

Sin mas y esperando un comentario q me pueda ayudar..

Quedo de uds..

Karlos Traveceras
Saludos

Private Sub txtCantidad_KeyPress(ByVal sender As Object, ByVal e As
System.Windows.Forms.KeyPressEventArgs) Handles txtCantidad.KeyPress

Try '



If e.KeyChar = "." Then

If InStr(Me.txtCantidad.Text, ".") > 0 Then

e.Handled = True

Else

e.Handled = False

End If

Exit Sub

End If



Catch ex As Exception

Debug.WriteLine(ex.ToString)

End Try

"Karlos Traveceras" wrote in
message news:

Mis estimados..

Necesito q en un texbox solo exista la posibilidad de ingresar varios
caracteres pero un solo punto. es decir . q pueda escribirse el punto
( .
), pero q una vez escrito ya no se pueda escribir ningun punto mas.. pero
si
otros caracteres..

Espero haberme explicado..

Sin mas y esperando un comentario q me pueda ayudar..

Quedo de uds..

Karlos Traveceras
Saludos

Hola,

Puedes interceptar la pulsación con el evento "KeyPress":

Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As
System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
Dim sChar As String = "."
If e.KeyChar = sChar AndAlso CType(sender,
TextBox).Text.IndexOf(sChar) >= 0 Then e.Handled = True
End Sub

PD - Piensa en controlar también los posibles valores que provengan del
portapapeles (pegar).

Saludos,

Lluís Franco i Montanyés
[MS-MVP-MCP Visual Basic]

This posting is provided "AS IS" with no warranties, and confers no rights.
Este mensaje se proporciona "COMO ESTA" sin garantias y no otorga ningun
derecho

(Guía de netiquette del foro)
http://www.uyssoft.com/MSNews.aspx?sm
FIMARGE, S.A.
Principat d'Andorra

Tel.: +376 805 100
Fax: +376 824 500
Mi Perfil MVP en:
https://mvp.support.microsoft.com/profileaa1615-1a2f-4202-bc3f-aec297d967d2

Muchas Gracias mis estimados..

funciono de Maravilla..



"Lluís Franco" wrote:

Hola,

Puedes interceptar la pulsación con el evento "KeyPress":

Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As
System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
Dim sChar As String = "."
If e.KeyChar = sChar AndAlso CType(sender,
TextBox).Text.IndexOf(sChar) >= 0 Then e.Handled = True
End Sub

PD - Piensa en controlar también los posibles valores que provengan del
portapapeles (pegar).

Saludos,

Lluís Franco i Montanyés
[MS-MVP-MCP Visual Basic]

This posting is provided "AS IS" with no warranties, and confers no rights.
Este mensaje se proporciona "COMO ESTA" sin garantias y no otorga ningun
derecho

(Guía de netiquette del foro)
http://www.uyssoft.com/MSNews.aspx?sm
FIMARGE, S.A.
Principat d'Andorra

Tel.: +376 805 100
Fax: +376 824 500
Mi Perfil MVP en:
https://mvp.support.microsoft.com/profileaa1615-1a2f-4202-bc3f-aec297d967d2

A mandar...
:-)

Lluís Franco i Montanyés
[MS-MVP-MCP Visual Basic]

This posting is provided "AS IS" with no warranties, and confers no rights.
Este mensaje se proporciona "COMO ESTA" sin garantias y no otorga ningun
derecho

(Guía de netiquette del foro)
http://www.uyssoft.com/MSNews.aspx?sm
FIMARGE, S.A.
Principat d'Andorra

Tel.: +376 805 100
Fax: +376 824 500
Mi Perfil MVP en:
https://mvp.support.microsoft.com/profileaa1615-1a2f-4202-bc3f-aec297d967d2