Simbolos numericos vb.net falta img
En este ocasión mostrare un ejemplo de vb.net en el cual
se introducirán 2 números para mostrar con ellos
el uso de los 4 símbolos numéricos principales
los cuales son:
+ para hacer sumas
como ser 2+2 = 4
- para restas
99-1 = 98
* para multiplicar
5*4 = 20
/ para dividir
99/3 = 33
aqui el codigo:
se introducirán 2 números para mostrar con ellos
el uso de los 4 símbolos numéricos principales
los cuales son:
+ para hacer sumas
como ser 2+2 = 4
- para restas
99-1 = 98
* para multiplicar
5*4 = 20
/ para dividir
99/3 = 33
aqui el codigo:
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
ComboBox1.Items.Add("Suma")
ComboBox1.Items.Add("Resta")
ComboBox1.Items.Add("Multiplicacion")
ComboBox1.Items.Add("Division")
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'Usaremos el cdbl para la convertir a doble el valor ingresado
If (ComboBox1.Text = "Suma") Then
Label4.Text = CDbl(TextBox1.Text) + CDbl(TextBox2.Text)
ElseIf (ComboBox1.Text = "Resta") Then
Label4.Text = CDbl(TextBox1.Text) - CDbl(TextBox2.Text)
ElseIf (ComboBox1.Text = "Multiplicacion") Then
Label4.Text = CDbl(TextBox1.Text) * CDbl(TextBox2.Text)
ElseIf (ComboBox1.Text = "Division") Then
Label4.Text = CDbl(TextBox1.Text) / CDbl(TextBox2.Text)
Else : Label4.Text = "Error"
End If
End Sub
End Class
Comentarios
Publicar un comentario