Mascara de Text Box

Valeu Fernando

Private Sub CommandButton1_Click()
    Dim Valor As Integer
   
    Valor = 89
    TextBox1.Text = Format(Valor, "0000")
End Sub

............www.alpconsultoria.com.br........ Caso esta resposta tenha solucionado sua dúvida, favor clicar em “Marcar como Resposta” para que outros membros possam compartilhar lendo este thread..