-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