Visua Foxpro编程实例.doc

实验五 Visual Foxpro编程实践 一. 实验目的与要求 掌握利用Visual Foxpro编制开发自己的应用程序的实践知识，并学会在程序调试中自行发现问题和修改程序代码，最终完成应用程序的无错运行。 二. 相关知识 利用Visual Foxpro自行开发编制应用程序的步骤： 1．设置好系统的工作环境(尤其注意工作目录的默认设置)。 2．如果是初次进行，应当先建立一个项目，为该项目命名，激活项目管理器。如果是接着上次的工作进行，则打开上次工作的本项目，同样也激活项目管理器。 3．在项目管理器的“数据”à“数据库”下面创建一个数据库，并命名(如已创建，则跳过本步骤)。 4．在项目管理器的“数据”à“数据库”à“表”下面进行数据表的创建或修改工作，并输入少量的正确数据以便将来的运行调试(如果已经创建了数据表，则跳过本步骤)。 5．在项目管理器的“文档”下面创建该应用程序所用到的所有表单，设计好各表单的界面并为表单里的控件填写程序代码.(注意为表单添加各自的数据环境，否则会出错!) 6．试运行各表单，发现问题后重新修改有问题的表单的代码，反复调试和修改直至最后能无错运行。 7．将应用程序打包发布或制作成安装文件。 三. 实验内容与步骤 本次实验以一个简单的学生成绩管理系统为例。首先，对该系统作一个简单的介绍： 该应用系统为完成学生信息和成绩的管理系统，主要有以下几个应用模块： 用户登录管理： 系统具有管理员功能，只有取得管理员权限的人才能使用本系统。 数据添加功能： 对学生基本信息、教师基本信息、班级信息、课程信息、学生成绩信息进行添加录入。 数据查询功能： 对上述信息的基本查询。 数据修改功能： 对上述信息可进行修改工作。 统计操作： 可分别按个人成绩、单科成绩统计出最高成绩、最低成绩和平均成绩等。 打印功能： 对上述信息可进行打印。 实验步骤如下： 1．数据库设计： 首先设置好系统的运行环境和工作目录，然后建立项目，为项目命名为“学生成绩管理系统”，激活项目管理器，并在在项目管理器的“数据”à“数据库”下面创建一个数据库，命名为“学生成绩管理”，在“数据库”的“表”下面创建以下各数据表： 用户信息表user (表名命名为user即可，不要加汉字。以下同。) 字段名称 类型 宽度 用户名 字符型 10 密码 字符型 10 学生信息表 student 字段名称 类型 宽度 学号 字符型 8 姓名 字符型 10 性别 字符型 2 班级编号 字符型 6 出生日期 日期型 8 教师信息表 teacher 字段名称 类型 宽度 教师代码 字符型 4 姓名 字符型 10 性别 字符型 2 职称 字符型 10 部门 字符型 10 出生日期 日期型 8 班级信息表 classes 字段名称 类型 宽度 班级编号 字符型 6 年级 字符型 4 专业 字符型 10 系代码 字符型 2 学制 字符型 2 类型 字符型 4 课程信息表 course 字段名称 类型 宽度 课程代码 字符型 6 课程名称 字符型 16 类别 字符型 4 教师代码 字符型 4 分数信息表 score 字段名称 类型 宽度 学号 字符型 8 课程代码 字符型 6 成绩 数值型 4 创建好以上数据表以后，应该向每个表中添加适量合法数据以便后面的测试。 2.表单设计 2.1登录模块 功能描述： 实现只有指定的用户才能访问系统的功能。并且，只有身份为“管理员”的用户才可以调用修改模块修改数据。 界面设计： 表单名称： login 文件名： login.scx 数据环境： user.dbf 对象设置： 对 象 属 性 值 说 明 Form1 Caption 欢迎使用学生成绩管理系统 Lable1 Caption 学生成绩管理系统 Lable2 Caption 请输入用户名： Lable3 Caption 请输入密码： Combo1 RowSourceType 6-字段 指定数据值来源类型 RowSource User.用户名 指定数据值来源 Cammand1 Caption 登录 Cammand2 Caption 退出 函数与方法声明： Command1中的Click事件 功能：完成在登录时对输入的用户名和密码的检验，如果数据表user中存在输入的用户名和密码信息，则调用主窗口(如果是管理员则不但调用主窗口，还允许执行主窗口的修改功能)，否则提示输入错误。 程序清单： private kl，yh，st st=密码不正确，请重新输入! use user kl=alltrim(thisform.text1.value) yh=alltrim(bo1.value) *将用户输入的用户名和密码的值分别保存在yh和kl变量中