Sencillo Programa de suma en VB.NET

Ingredientes:

3 labels

3 cajas de text

1 botón.

En nuestro caso, a las cajas de texto le dimos el nombre de txtNum1, txtNum2 y txtSuma y al botón btnSumar. 

Delaramos una variable llamada suma de tipo de Double la cual almacena la suma de los 2 textBox y luego la caja txtSuma almacena y muestra el resultado. 

Codigo fuente:

Public Class Form1 

    Private Sub btnSumar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSumar.Click 

        Dim suma As Double 

        suma = CDbl(txtNum1.Text) + CDbl(txtNum2.Text) 

        txtSuma.Text = CStr(suma) 

    End Sub 

End Class

Programa:

Note que txtNum1.Text y txtNum2.Text están dentro de la función CDbl esta funcion permite que las cajas de texto acepten números, ya que por defecto (by default) las cajas de texto solo aceptan texto, por lo tanto hay que decirle al programa que lo se va entrar en la caja de texto son números y no texto.

CDbl = Convert to doublé (permite que las cajas de texto acepten numeros de tipo int y double)

Por otro lado note que la variable suma esta dentro de la función CStr. Como la salida por la caja de texto txtSuma.Text dentra como salida un numero hay que decirle al programa que convierta ese numero en un string.

CStr = Convert to String (permite que las cajas de texto acepten como salida numeros)

Si no hace estas conversiones con estas funciones el programa no podrá hacer la suma, solo mostrara como salida lo que se entre en las cajas de texto. Haga la prueba usted mismo, elimine las funciones CDbl y CStr y vera.