martes, 8 de febrero de 2011

EJERCICIO 31

1.- Evaluar la funciòn Y=3x²-4x+2 para X=2, -5, 8 USAR UN CHECKBOX para cada valor de X y programar cada evento clik de cada checkbox con la operaciòn correspondiente y el despliegue del resultado


PRIMER FORMULARIO


' Gambas class file

PUBLIC SUB _new()

END


PUBLIC SUB Form_Open()

END


PUBLIC SUB Button2_Click()
QUIT
END


PUBLIC SUB Button1_Click()
IF CheckBox1.Value = TRUE THEN
FMain.Hide
Form1.Show
END IF
IF CheckBox2.Value = TRUE THEN
FMain.Hide
Form2.Show
END IF
IF CheckBox3.Value = TRUE THEN
FMain.Hide
Form3.Show
END IF
END






SEGUNDO FORMULARIO


' Gambas class file




PUBLIC SUB Button1_Click()
Form1.Hide
FMain.Show
END


PUBLIC SUB Button2_Click()
TextBox1.Text = (3) * (2) ^ 2 - (4) * (2) + 2
END








TERCER FORMULARIO


' Gambas class file




PUBLIC SUB Button1_Click()
Form2.Hide
FMain.Show
END

PUBLIC SUB Button2_Click()
TextBox1.Text = (3) * (-5) ^ 2 - (4) * (-5) + 2
END








CUARTO FORMULARIO


' Gambas class file




PUBLIC SUB Form_Open()

END

PUBLIC SUB Button1_Click()
Form3.Hide
FMain.Show
END

PUBLIC SUB Button2_Click()
TextBox1.Text = (3) * (8) ^ 2 - (4) * (8) + 2
END

No hay comentarios:

Publicar un comentario