Числовые типы данных имеют метод ToString, который вы можете вызвать.
ToString () просто преобразует числовое значение в строку, но вы можете при желании
укажите формат, указав формат в качестве параметра метода.
Я не знаю все форматы, но я знаю, что "C2" - это валюта с двумя десятичными знаками.
Например, в вашем размещенном коде:
Dim total As Double
If rb_s1.Checked = True Then
txt_1.Text = "650.00"
Else
txt_1.Text = String.Empty 'String.Empty is just a more precise way than ""
txt_1.Text = total.ToString("C2")