martes, 8 de febrero de 2011

4.- Capturar los datos mas importantes de un estudiante incluyendo tres


PUBLIC SUB Button1_Click()
DIM A AS String
A = TextBox6.Text
IF A = ("MEDICINA") THEN
FMain.Hide
Form1.Show
ELSE
Message("Se cita a los padres del estudiante a una platica amistosa con los maestros de la escuela.")
ENDIF
END
PUBLIC SUB Button2_Click()
TextBox1.Text = ""
TextBox2.Text = ""
TextBox3.Text = ""
TextBox4.Text = ""
TextBox5.Text = ""
TextBox6.Text = ""
END

No hay comentarios:

Publicar un comentario