Sumando 2 numeros

Private Sub Button1_Click (ByVal sender As System.Object, ByVa System. EventArgs) Handles Button1.Click

Dim num1 As Single

Dim num2 As Single

        num1 = TextBox1.Text

        num2 = TextBox2.Text

If num1 >= num2 Then

            TextBox3.Text = "numero 1 mayor numero 2"

Else

            TextBox3.Text = "numero 2 mayor numero1"

EndIf