Changing text in textboxes

[hobbes2103]

I have a textbox and I want that if I type "." it automatically turns into ","

 

Is there a special command to do that?

[dynamic_sysop]

   Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
       If e.KeyChar = "." Then
           e.Handled = True
           TextBox1.SelectedText = ","
       End If
   End Sub

[hobbes2103]

Thank you!