Crearemos un programa que calcule el porcentaje
Creamos el Form con:
3 Textbox
3 radiobutton
1 button
Luego le damos click al Button calcularY comenzamos a programar
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim producto As Integer
Dim descuento As Integer
Dim Total As Integer
producto = TextBox1.Text
If RadioButton1.Checked = True Then
descuento = producto * 0.25
ElseIf RadioButton2.Checked = True Then
descuento = producto * 0.5
ElseIf RadioButton3.Checked = True Then
descuento = producto * 0.1
End If
TextBox2.Text = descuento
Total = producto - descuento
TextBox3.Text = Total
End Sub
No hay comentarios:
Publicar un comentario