como ingresar guiones en un text box vb2005

[Aquaventus]

Hola luisito1!!! bueno eso lo podrias hacer de la siguiente manera, en el evento keypress del textbox:

Código vb.net:

Private Sub TextBox1_KeyPress(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
        Dim texto As String = TextBox1.Text
        If TextBox1.Text.Length = 5 Then
            texto = texto + "-" + e.KeyChar
            TextBox1.Text = texto
            e.Handled = True
            TextBox1.Select(TextBox1.Text.Length, 0)
        End If
    End Sub
 

Y para que quites el "-" al momento de guardar harias esto... por ejemplo al hacer clic en un boton:

Código vb.net:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim texto As String = TextBox1.Text
        texto = texto.Remove(5, 1)
        TextBox1.Text = texto
End Sub
 

Espero te haya sido util. Saludos! .