Utilización de botones y cajas de texto para hacer operaciones

-Creamos el siguiente formulario utilizando Botones y Cajas de Texto.

Public Class Form1

    'CONFIGURACION DEL BOTON SALUDAR
    Private Sub Boton_Click(sender As Object, e As EventArgs) Handles Boton.Click

        MsgBox("Hola esto es pc-solucion", MsgBoxStyle.Exclamation, "Saludo")
        'Al pulsar encima del botón nos aparecerá el siguiente mensaje.

    End Sub


    'CONFIGURACIÓN DE LA SUMA
    Private Sub Boton2_Click(sender As Object, e As EventArgs) Handles Boton2.Click

        Dim num1, num2, suma As Integer  'Creamos las variables para los Textbox y el botón del formulario.

        num1 = TextBox1.Text  'Asignamos el valor que se introzca en el TextBox en la variable.
        num2 = TextBox2.Text  'Asignamos el valor que se introzca en el TextBox en la variable.

        suma = num1 + num2  'Sumamos las dos variables.

        MsgBox(suma)  'Mostramos en pantalla el resultado.


    End Sub

Resultado