I have a formatted textbox that numeric values are entered into. After clicking away from the textbox and then click back into the textbox, the input value changes. ex: 23,000.00 changes to 23.00

Sample of code:

Private Sub TextBox1_leave(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.Leave
Dim value1 As Decimal = Val(TextBox1.Text)
TextBox1.Text = Format(value1, "##,##0.00")
display_results()
End Sub

By removing the format, this behavior does not happen.

What am I doing wrong?

All help is appreciated!