Caros Colegas, estou começando a dar os primeiros passos para o Vb.Net e gostaria de saber o seguinte: No VB 6 eu tenho uma função para digitar os valores numa TextBox e a vírgula e o ponto aparecem automaticamente. Gostaria de fazer isso no Vb.Net também, mas não estou conseguindo. O código abaixo está digitado no evento KeyPress da TextBox:
If Len(Text1.Text) > 1 Then
Text1.Text = Replace(Text1.Text, ",", "")
Text1.Text = Left(Text1.Text, Len(Text1.Text) - 1) & "," & Right(Text1.Text, 1)
Text1.Text = Format(Text1.Text, "#,##0.0")
Text1.SelStart = Len(Text1.Text)
End If
Alguém poderia me ajudar?
Obrigado.
Até mais.
