Private Sub Command1_Click() If (Us.Text = True) Then Can.Text = (1.5 * Us.Text) Jap.Text = (1.5 * Us.Text) Mex.Text = (1.5 * Us.Text) Ind.Text = (1.5 * Us.Text) Aus.Text = (1.5 * Us.Text) End If
It convert Us dollars to 5 different currencies. My problem is how do I make it so that it can convert Canadian dollars to Us, Jap, Mex and so on. And I know that the conversion rates are incorrect.

Start a new topic
Add Reply




MultiQuote
| 


