ComboBox and calculations

hi guys,
i was wondering if we could create a program with a ComboBox that includes km,m,cm and if we choose km for example it converts them to mm.

Any ideas how it can be done?(1km = 1000m,etc...)

Comments

  • : hi guys,
    : i was wondering if we could create a program with a ComboBox that includes km,m,cm and if we choose km for example it converts them to mm.
    :
    : Any ideas how it can be done?(1km = 1000m,etc...)

    Easy, as long as you know the calculations:
    [code]
    Combo1.AddItem "km -> mm (1:1000)"
    Combo1.AddItem "mm -> km (1000:1)"

    Private Sub Combo1_Click()

    Select Case Combo1.ListIndex
    Case 0
    Text2.Text = CStr(Val(Text1.text) * 1000)
    Case 1
    Text2.Text = CStr(Val(Text1.text) / 1000)
    End Select

    End Sub
    [/code]
    Hope this helps!
Sign In or Register to comment.

Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!

Categories

In this Discussion