Visua Foxpro程序设计大作业
请将答案写在学院标准答题纸上（从平台“课程资料”下载），注明题号即可。
说明：前两个题请同学们使用结构化编程语句完成
1、请同学们编写一个计算1！+2！+….+5！=？（1至5的阶乘累加），提示：请使用循环语句编写些程序。（20分）
2、求一元二次方程AX2＋BX＋C＝0的实根。（20分）
3、请同学们根据下面表单界面设计一个计时器，并编写相应代码，实现计时器秒表功能。（注意标注上什么控件主要属性、什么事件及其代码）（20分）
要求使用时间控件，点击开始即可动态显示秒数，点停止显示最后秒数，开始是0。

4、请同学们根据下面表单界面设计一个调色板，并编写相应代码，实现选择颜色功能。（注意标注上什么控件主要属性、什么事件及其代码）（20分）
要求选中一种颜色，则选项按钮组的背景色即为该色。

5、登录密码窗口设计：大家可以任意设计一个密码登录窗口，要求密码不是明码显示，用*代替，密码验证三次自动退出，若有误，有提示。（20分）

第2题，还真的没做过。。

主要问题是1，2的解题方法已给回老师了，如果有解法过程，就可以写出程序来

人家只是问作业，没必要屏蔽。
大家可以选择提示性的回答，引导学生。

第一题和第二题,竟然发现自己数学都退给数学老师了.

初中的数学全忘记了

A=thisform.text1.Value
B=thisform.text2.Value
C=thisform.text3.Value
x0=B*B-(4*A*C)
thisform.text4.Value=x0
DO CASE
    CASE x0=0
        x1=-B/2*A
        thisform.text5.Value=x1    
        thisform.text6.Value=x1    
    CASE x0>0
        x1=(-B+SQRT(x0))/(2*A)
        x2=(-B-SQRT(x0))/(2*A)
        thisform.text5.Value=x1    
        thisform.text6.Value=x2
    CASE x0<0
        thisform.text5.Value="∽"    
        thisform.text6.Value="∽"
ENDCASE 

A,B,C是输入进去的，还是计算出来的。。。

代进去验证了一下，代码居然没写对

该好好学习的时候，在打游戏泡妞；要考试了，临时抱佛脚。。。

这样的学生不能教啊。。。

刚才，查了一下，关键是 b平方减4ac