How to Design Simple VB Conversion Form

Watch this Video

 



Code for  Temperature Conversion Form Button(Result)

Private Sub Command1_Click()
If Option1.Value = False And Option2.Value = False Then
MsgBox "Select Measurement", vbOKOnly, "Error"
ElseIf Option1.Value = True Then
tempout.Text = (Temptext * 9 / 5) + 32
tempmeasur.Text = "Fahrenheit"
ElseIf Option2.Value = True Then
tempout.Text = (Temptext - 32) * 5 / 9
tempmeasur.Text = "Celsius"

End If

End Sub