Manejo de entradas, eventos y operaciones aritméticas en VB.NET (TextBox, Button y Label)

¿Qué sucede si el usuario presiona una tecla que no es un dígito ni '+-*/.' ni retroceso en TextBox1?

1 / 5(10 total)

Apuntes

Explique cual es la función Si el usuario preciona cualquier otra tecla ,la acción será bloqueada y no se registrará en el control. Private Sub TextBox1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox1.KeyPress If Not Char.IsDigit(e.KeyChar) AndAlso Not "+-*/.".Contains(e.KeyChar) AndAlso Not e.KeyChar = ChrW(Keys.Back) Then e.Handled = True End If End Sub Explique cual es la función Toma el contenido de TextBox1 y de TextBox2, Se convierten esos textos en números usando Val ,Se suman esos números . Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Label5.Text = Val(TextBox1.Text) + Val(TextBox2.Text) End Sub Explique la función Procede a tomar el número del segundo cuadro del texto (TextBox2) Verifica si es cero : si es 0 muestra un mensaje de error. f Val(TextBox2.Text) = 0 Then Label5.Text = "LA DIVISION POR CERO NO ESTA DEFINIDA" Else Label5.Text = Val(TextBox1.Text) / Val(TextBox2.Text) End If Label5.Text = Val(TextBox1.Text) - Val(TextBox2.Text) Toma los textos de TextBox , Convierte esos textos a números con Val Muestra el resultado en label5 Label5.Text = Val(TextBox1.Text) * Val(TextBox2.Text) End Sub Convierte el contenid...

Estudia con juegos interactivos

Sube tus apuntes y genera flashcards, examenes y mas con IA

Empezar gratis