Caja de texto

{^o^}
20 de Enero del 2004
Quisiera saber como solo poner una - en una caja de texto lo hize con esto
If InStr(texto.Text, "-") > 0 Then
e.Handled = True
End If
pero despues de encontrar el - ya no me deja entrar mas caracteres q puedo hacer?

Uninauta
20 de Enero del 2004
Pregunto: Dentro de que evento pusiste ese codigo? y ademas te agradeceria si pudieras darme una explicacion un poco mas detallada de lo que pretendes hacer ya que no lo entiendo bien. Lo que pretendes es que solo pueda ingresar ese caracter?
Si es asi lo logico seria que lo controles en el evento KEYUP y si detectas que el numero de caracter es distinto al que pretendes lo anulas o le asignas el valor de "-"

{^o^}
20 de Enero del 2004
pues esta en el evento KeyPress y solo quiero q este una sola vez el caracter ya se . oh "-" asi como para ingresar 10.00 oh 001-0001 ah eso me refieron