Página 1 de 1

Texbox com Formatação.

Enviado: 09 Ago 2022 às 16:58
por vilc
Boa Tarde, como faço para quando digitar na textbox ele formatar para o formato:
ex: 123456789 para 123 456 789
quando for digitando já ficar na formatação, desde já agradeço.

Re: Texbox com Formatação.

Enviado: 11 Ago 2022 às 09:23
por Foxtri
Bom dia.
Veja se era isso.

Private Sub TextBox1_Change()
If Len(TextBox1.Text) = 3 And TextBox1.Text Like "###" = True Then TextBox1.Text = TextBox1.Text & " "
If Len(TextBox1.Text) = 7 And TextBox1.Text Like "### ###" = True Then TextBox1.Text = TextBox1.Text & " "
If Len(TextBox1.Text) = 11 And TextBox1.Text Like "### ### ###" = True Then TextBox1.Text = TextBox1.Text & " "
If Len(TextBox1.Text) > 11 Then TextBox1.Text = Left(TextBox1.Text, 11)
End Sub

Até
Foxtri

Re: Texbox com Formatação.

Enviado: 14 Ago 2022 às 09:36
por vilc
@Foxtri, muito obrigado, ficou perfeito...