martes, 8 de febrero de 2011

Evaluar la funciòn Y=3x²-4x+2

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