-Creamos el formulario e insertamos la configuración en el botón Calcular.
Public Class Form1
Private Sub RadioButton1_CheckedChanged(sender As Object, e As EventArgs) Handles RadioButton1.CheckedChanged
End Sub
Private Sub GroupBox1_Enter(sender As Object, e As EventArgs) Handles GroupBox1.Enter
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim num1, num2, resultado As Integer 'Creamos las variables de los número de las cajas de texto y resultado.
num1 = TextBox1.Text 'Recojemos el número introducido el la caja de texto.
num2 = TextBox2.Text
If (RadioButton1.Checked = True) Then 'Si el botón de Suma está marcado (True).
resultado = num1 + num2
ElseIf (RadioButton2.Checked = True) Then 'Si el botón de resta está marcado.
resultado = num1 - num2
End If
MsgBox("El resultado es " + resultado.ToString) 'Mostramos en pantalla el resultado.
End Sub
End Class

