Parse negative value with thousands separator and decimal : Double Parse « Data Types « VB.Net

Parse negative value with thousands separator and decimal

Imports System.Globalization
Imports System.Threading

Module Example

    Public Sub Main()
       Thread.CurrentThread.CurrentCulture = CultureInfo.CreateSpecificCulture("en-US")
       Dim value As String
       Dim styles As NumberStyles
       value = "(4,999.64)"
       styles = NumberStyles.AllowParentheses Or NumberStyles.AllowTrailingSign Or NumberStyles.Float 
       ShowNumericValue(value, styles)
    End Sub
    Private Sub ShowNumericValue(value As String, styles As NumberStyles)
       Dim number As Double
          number = Double.Parse(value, styles)
          Console.WriteLine("Converted '{0}' using {1} to {2}.",value, styles.ToString(), number)
       Catch e As FormatException
          Console.WriteLine("Unable to parse '{0}' with styles {1}.",value, styles.ToString())
       End Try
    End Sub
End Module


Related examples in the same category

1.Parse a floating-point value with a thousands separator
2.Parse a floating-point value with a currency symbol and a thousands separator.
3.Parse value in exponential notation
4.Parse a negative integer number
5.Parse currency value using en-GB culture
6.Parse a string in exponential notation with the AllowExponent and Number flags
7.Parse a currency value with leading and trailing white space, and white space after the U.S. currency symbol