Changing Strings to Integers

[Guest_imported]

Hello,

I'm very new to vbscript (it's bee a while since i've worked with visual basic 5 also). Anyways. I've tried using the val function to change a string to an integer but it won't work! My strings are in the currency format. Here's some of my code...

'subroutine for changing a lable depending on what the
'user selects in the dropdown box.

Sub cmbScreen_Change()
Select Case Document.frmTTX.cmbScreen.Value
Case "V700 with 14.1'' XGA TFT LCD & Li-Ion Battery"
Document.frmTTX.lblScreen.Caption="$1,250.00"
' ...blah blah....


'Here I am trying to calculate the total cost.
'The Val function isn't working. HELP!

Sub cmdCalcSysComp_OnClick()
dim cost
cost = Val(Document.frmTTX.lblScreen.Caption)
Document.frmTTX.lblTotalSysComp.Caption=cost

End Sub

Is there another way to go about this?

 

[JohnYingling]

Try CCur(Document.frmTTX.lblScreen.Caption)

http://www.VBResizer.com

Generate Forms/Controls Resizing/Tabbing Class

http://www.VBCompare.com

Compare Code (Text)

http://www.VBSortGen.com

Generate Sort Class in VB or VBScript

 

[trollacious]

Have you tried CDbl (Convert to Double precision)? Put the $ in front of the text box, and you'll have a lot less trouble with this kind of thing.