Verified answer

Public Class Form1

Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged

Dim g As Double

g = TextBox1.Text

If (ComboBox1.SelectedIndex = 0) Then

TextBox2.Text = Trim(g * (9 / 5) + 32) + " ºF"

Else

TextBox2.Text = Trim((g - 32) * (5 / 9)) + " ºC"

End If

End Sub

End Class

No será de Farenheit a Celcius? La fórmula usada para convertir de F a C es C=(F−32)∗5/9

En VisualBasic lo puedes hacer así:

Agregas al Form un botón y dos TextBoxes

TxtCelcius.Text mostrará la respuesta de la conversión y en TxtFarenheit se introducirá el valor a convertir.

Private Sub Command1_Click()

TxtCelcius.Text = (Val(TxtFarenheit.Text)-32) * (5/9)

End Sub