Vb.net 2005 Currency Converter that updates

[samtaylor08]

Hi all

I have not made this look good yet, but it does work. Str4nger helped me do the updating of the rates from a website. I had been looking for something like this for ages before but there was not any that updated the currency rate, so I made one.

Sam

[TexasMd91]

Thnx it helped me alot

[SF03]

What about a converter that goes between 10 different currencies, being able to convert from any one of the 10 currencies to any of the remaining nine. I'm having trouble doing this, been trying an array but have been stumped for a while on how to get it done? Any ideas/help?

[samtaylor08]

Right ok what you would want is two group boxes right both with the 10 currencys in as radio buttons.

Then you could click 1 currency in left group and then it should disappear from the right group and then you click currency you want to convert to.

What I would do is have two string variables:
eg
Dim first as string
dim second as string

Then when a radio button is clicked in the 1st group box the first string equals what currency it is so:

If you click US Dollars it will equal USD

and then you will do the same in the next group box

If you click Pounds second will equal GBP

So instead of having different procedures for converting to 1 currency you will only need the button click procedure, which will have the code like this:

Dim strNumbers1() As String
        Dim seps1(1) As String
        Dim intX1 As Integer
        Dim rate As Integer
       
        seps1(0) = "/d/" & first & "/" & second & "/graph120.html" & Chr(34) & " class=" & Chr(34) & "menu" & Chr(34) & ">"
        seps1(1) = "</a>&nbsp;&nbsp;</font></td>"
 
        strNumbers1 = strSource.Split(seps1, StringSplitOptions.None)
        For intX1 = 0 To UBound(strNumbers1)
            If Len(strNumbers1(intX1)) < 9 Then
                rate = strNumbers1(intX1)
 
            End If
 
  input = txtinput.Text
            output = input / rate
            txtoutput.Text = output
        Next

I havent test this at all it is off the top of my head so cannot gurantee anything, I will try to get an example out but very busy at the mo.

Thanks

Sam

[SF03]

Thanks, I'll let you know how this works out.