ตัวอย่างการใช้งาน Decimal.TryParse

Dim a as string
Dim b as Decimal
If Decimal.TryParse(a, b) Then
   a = b.ToString("##,##0.00")
Else
   a = "can not parse"
End If