Disculpa
epa2, debía estar muy espeso ese día, porque evidentemente sé lo que es una máscara de entrada (de access que es donde se suelen utilizar). No comento las líneas de código, porque es bastante evidente lo que hace este procedimiento.
Vamos a ver si esto colma tus necesidades:
Código:
Private Sub TextBox1_Change()
largo_entrada = Len(Me.TextBox1)
Select Case largo_entrada
Case 2
Me.TextBox1.Value = Me.TextBox1.Value & "/"
Case 5
Me.TextBox1.Value = Me.TextBox1.Value & "/"
End Select
End Sub
Nota:
Se podría validar la entrada de datos, para que solo aceptase números, y se podría limitar el tamaño máximo textbox, pero esto ya te lo dejo para tí
Salu2