Calculadora combobox usando IF

Vamos hacer un ejemplo de IF con un nuevo control llamado combobox

Veamos algunas de las propiedades de un combobox:

• Ítems: esta es la propiedad más importante de un combobox, cuando hablamos de comobox es porque queremos contener una lista de posibles valores para poder seleccionar, en esta propiedad podemos agregar valores al comobox línea por línea. Existen más propiedades pero ustedes la irán descubriendo en su camino de la programación y seguro la usaremos más adelante.

Vamos a ver como se ve el código de un combobox

Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged

End Sub

Lo que está en rosado es el evento principal de nuestro comobox .

Un evento es que debe hacer mi programa al pasar algo, como cuando damos clic a un botón o presionamos una tecla ese es un evento de un control (para lo que no sean dado cuenta donde se encuentran la opciones de los eventos se lo mostrare en el video tutorial de este programa le dejo el link más abajo)

Vamos hacer nuestro interface grafico, solo vamos a usar 3 textbox 4 label, un combobox y un botón.

Ya conocemos dos de los controles aquí, vamos a ver las propiedades de cada uno.

Los tres textbox le vamos a cambiar la propiedad text = 0

le cambiamos la propiedad nombre a cada uno por num1,num2,resultado

Los label: a dos de ellos le vamos a poner en la propiedad texto Introducir numero, a otro seleccionar operación y el último resultado.

A nuestro combobox vamos a cambiar el nombre a operación. Y la propiedad Item vamos a agregar:

SUMA

RESTA

DIVISION

MULTIPLICACION

OJO PONERLO SUMA LE DAMOS A ENTER RESTA LE DAMOS A ENTER DIVISION LE DAMOS A ENTER Y MULTIPLICACION EN MAYUSCULA

Al form1 cambiar la propiedad name a Operaciones.

EL interface grafico se tiene que ver mas o menos haci:

Ahora le damos doble clic a nuestro comobox (llamado ahora operación)

Public Class Form1

Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles operacion.SelectedIndexChanged

End Sub

End Class

Vamos hacer el programa ahora el codigo.

Public Class Form1

Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles operacion.SelectedIndexChanged

'declarar 3 variables double por que vamos a

'usar divicion y tenemos que dominar decimales

Dim n1, n2, n3 As Double

'Una variable string para ver como se usa

Dim signo As String

'vamos a dar los valores a la variables

'num1 y 2 es un textbox lo unico que le cambiamos el nombre

n1 = Num1.Text

n2 = Num2.Text

'asigno el valos 0 a n3

n3 = 0

'operacion es un comobox pero le cambiamos el nombre

signo = operacion.Text

'ahora vamos hacer un pequeña calculadora veamos.

'SUMA ENTRE LAS COMILLA significa que una cadeda de caracter

'y estoy comparanod si signo es = a SUMA

If signo = "SUMA" Then ' si signo = SUMA ejecuta el digo

n3 = n1 + n2 'para sumar, si no se cumple evalua la siguiente

ElseIf signo = "RESTA" Then 'esta, si secuple ejecuta el codigo

n3 = n1 - n2 'para restar, si no se cumple evalua la siguiente

ElseIf signo = "MULTIPLICACION" Then ' esta,si se cumple ejecuta el codigo

n3 = n1 * n2 'para MULTIPLICAR, si no se cumple evalua siguiente

ElseIf signo = "DIVISION" Then ' esta,si se cumple ejecuta el codigo

n3 = n1 / n2 'para DIVISION, si no se cumple evalua siguiente

Else ' si no se cumple ninguna de las anteriores

MsgBox("Operasfion no declarada") ' mostrar ese mensaje

End If

' Asigno el valor a el texbox resultado

Resultado.Text = n3

End Sub

End Class

Aqui el dejo la aplicacion para que la puedan descargar, y un video de la aplicacion que acabamos de hacer en el turorial.

[MU] Calculadora combobox usando IF

[Youtube] Calculadora combobox usando IF

Cualquier duda comentar o sugerencia comentar