Passing parameters - currency

[Felipe Bernal]

Hi , i'm tryong to pass a parameter to a web service but
i get an error something like "..input string is not well
formatted...." i'm using this code..

Sub getAnswer(sender As Object, e As System.EventArgs)
dim aCurrencyConvertor as new CurrencyConvertor()
dim aDouble as Double
dim FromCurrency as Currency = bFromCurrency.Text
dim ToCurrency as Currency = bToCurrency.Text
aDouble = aCurrencyConvertor.ConversionRate
(FromCurrency, ToCurrency)
total.text = aDouble
End Sub

the problem is i don't know how to pass the parameters as
currency type, they are strings, currency codes (i.e.
USD, CAN, PEN)

i hope i can get some help here

Felipe