String.Trim

[BK]

Consider the following code:

Dim temp As String = Me.txtAmount.Te xt
Dim nonNumerics As String
nonNumerics = "$,"
temp = temp.Trim(nonNu merics.ToCharAr ray)

If txtAmount.Text contains "$1,000.00" , shouldn't the
temp.Trim(nonNu merics.ToCharAr ray) strip out the comman (,)? It strips
out the dollar ($) sign, but not the comma. I need to pull out any
nonnumeric characters from the text so that "$1,000.00" becomes
"1000.00", any other ideas?

[jvb]

I tried this and it appears for some reason that commas aren't removed
using this method. You can cast that string representation directly
using CDbl. Try this:

Public Sub Main()

Dim str1 As [String] = "$1,000.01"

Console.WriteLi ne("Original string: {0}", str1)
Console.WriteLi ne("Cast string: {0}", CDbl(str1))

Console.Write(" Press any key to continue...")
Console.ReadLin e()

End Sub

[Mattias Sjögren]

If txtAmount.Text contains "$1,000.00" , shouldn't the
temp.Trim(nonN umerics.ToCharA rray) strip out the comman (,)?
No, it only removes characters at the beginning and end of the string.

I need to pull out any
nonnumeric characters from the text so that "$1,000.00" becomes
"1000.00", any other ideas?

You can try using Stirng.Replace instead.
Mattias

--
Mattias Sjögren [C# MVP] mattias @ mvps.org
http://www.msjogren.net/dotnet/ | http://www.dotnetinterop.com
Please reply only to the newsgroup.

[Jim Wooley]

> Consider the following code:

Dim temp As String = Me.txtAmount.Te xt
Dim nonNumerics As String
nonNumerics = "$,"
temp = temp.Trim(nonNu merics.ToCharAr ray)
If txtAmount.Text contains "$1,000.00" , shouldn't the
temp.Trim(nonNu merics.ToCharAr ray) strip out the comman (,)? It
strips out the dollar ($) sign, but not the comma. I need to pull out
any nonnumeric characters from the text so that "$1,000.00" becomes
"1000.00", any other ideas?

It appears that the key question is, what do you plan to do with temp. If
you are going to work with it as a number, you might want to consider decimal.Parse
or decimal.TryPars e. You will need to use the overload that includes the
NumberStyles option if you need to handle currency.

Jim Wooley
http://devauthority.com/blogs/jwoole...03/15/788.aspx

[BK]

Thanks, that did it!

I was trying to return a double, so I it to:

Dim temp As String = Me.txtAmount.Te xt
Dim nonNumerics As String
nonNumerics = "$,"
temp = temp.Trim(nonNu merics.ToCharAr ray)
Dim returnValue As Double

Return returnValue.Par se(temp)

[Kerry Moorman]

BK,

All you should need is:

Dim temp As String = Me.txtAmount.Te xt

Return Double.Parse(te mp, Globalization.N umberStyles.Cur rency)

Kerry Moorman
"BK" wrote:

Thanks, that did it!

I was trying to return a double, so I it to:

Dim temp As String = Me.txtAmount.Te xt
Dim nonNumerics As String
nonNumerics = "$,"
temp = temp.Trim(nonNu merics.ToCharAr ray)
Dim returnValue As Double

Return returnValue.Par se(temp)

[Jim Wooley]

> BK,

All you should need is:

Dim temp As String = Me.txtAmount.Te xt

Return Double.Parse(te mp, Globalization.N umberStyles.Cur rency)

Actually, you would need to wrap this in a try..catch block as Double.Parse
will throw a format exception if the temp value is not a number. As an alternative,
you could use the following:

Sub Main()
Console.WriteLi ne(GetValue(txt Amount.Text).To String)
Console.ReadLin e()
End Sub

Private Function GetValue(ByVal InVal As String) As Double
Dim temp As Double
If Double.TryParse (InVal, temp) Then
Return temp
Else
'Return something else to indicate that this is an invalid input
Return Double.MinValue
End If
End Function

Jim Wooley
http://devauthority.com/blogs/jwooley