code for options

[samm]

How I make code for options

First selection:
option1 = 0.4 option2 = 0.5 option3 = 0.6
Second selection
Option4 = 0.4 option5 = 0.5 option6 = 0.6

The user selects one option from first selection and one option from second selection then the result come in textbox

 

[samm]

thank you so much Tony Hine

i make like this code but I have error in line number 10 became red color ((MsgBox “Error In Case”))

also when I select option from first frame and second frame I did not get the total value in the text(T1).

Private Sub Frame0_AfterUpdate()
Select Case Frame0
Case 1
Let T1 = "0.4"
Case 2
Let T1 = "0.5"
Case 3
Let T1 = "0.6"

Case Else


End Select

End Sub

Private Sub Frame11_AfterUpdate()
Select Case Frame11
Case 1
Let T1 = "0.4"
Case 2
Let T1 = "0.5"
Case 3
Let T1 = "0.6"

Case Else