Mega Code Archive

 
Categories / VB.Net / Data Types
 

Decimal Parse Method Converts string to Decimal using the specified style and culture-specific format

Imports System Imports Microsoft.VisualBasic Imports System.Globalization Module MainClass1     Sub Main()         Dim value As String         Dim number As Decimal         Dim style As NumberStyles         Dim provider As CultureInfo         value = "999 888,12"         style = NumberStyles.AllowDecimalPoint Or NumberStyles.AllowThousands         provider = New CultureInfo("fr-FR")         number = Decimal.Parse(value, style, provider)         Console.WriteLine("'{0}' converted to {1}.", value, number)         Try             number = Decimal.Parse(value, style, CultureInfo.InvariantCulture)             Console.WriteLine("'{0}' converted to {1}.", value, number)         Catch e As FormatException             Console.WriteLine("Unable to parse '{0}'.", value)         End Try     End Sub End Module