任务学生信息管理系统的设计与实现.docVIP

华北科技学院计算机系综合性实验 实 验 报 告 课程名称 Visual FoxPro 及其应用系统开发 实验学期 2010 至 2011 学年 第 二 学期 学生所在系部 土木工程系 年级 大一 专业班级 工房B101 学生姓名 刘永良 学号 201005034104 任课教师 耿子林 实验成绩 计算机系制 实验报告须知学生应该填写的内容包括：封面相关栏目、地点、时间、结果分析。教师应该填写的内容包括：实验教师根据课程的实验要求，评定学生的实验成绩未尽事宜，请参考该课程实验大纲和大纲。《 计算机技术基础 》课程综合性实验报告 开课实验室：信息楼基础七 2011 年6 月 22 日 一、实验题目：学生信息管理系统的设计与实现 二、实验目的 通过此综合实验练习，让同学将本课程所学主要知识有机综合起来，理解数据库原理的基本概念，能够在数据库应用程序中正确应用数据(库)表、程序、菜单、表单和报表等文件，为以后开发应用程序打下坚实基础。 三、实验设备及环境 (1) 硬件设备：PC机一台 (2) 软件环境：安装Windows操作系统，安装数据库管理系统Visual FoxPro等。 三、实验内容 scx ，运行后显示封面为图-1所示 图-1学生信息管理系统启动表单logo.scx nterval值为3000，使用布局工具设定各控件位置，如图-1所示； 3．设置时钟控件Timer事件代码如下，保存表单名称为logo.scx,运行表单即如图-1所示。 thisform.release do form login.scx 封面运行后显示3秒钟退出，并进入系统登录界面为图-2所示 图-2学生信息管理系统登录表单login passwd.dbf,设置表单及主要控件属性； 3．双击“进入系统”按钮，设置其Click事件代码; set exact on thisform.i=thisform.i+1 Select passwd locate for all trim(用户名)=all trim(bo1.value) if found( ) and all trim(密码)=all trim(thisform.text1.value) Set exact off Release this form Do form main Else If thisform.i3 message box(账号或密码错误, 请重试!,48,警告) bo1.value= thisform.text1.value= bo1.setfocus Else message box(非法用户, 系统无法登录!,16,警告) Release this form Endif Endif 4．双击“退出系统”按钮，设置其Click事件代码; yn = message box(确定退出?,4+32,信息窗口) if yn = 6 thisform.release clear events quit endif 5．保存表单名称为login.scx,运行表单即如图-2所示 （三）在系统登录界面图-2中，登录用户名通过下拉列表框选择，正确输入密码后，单击“进入系统”按钮，此界面退出，并启动系统主界面为图-3所示；密码错误则显示警告界面如图-4所示，单击“确定”按钮，重新输入；密码输入3次错误则显示如图-5所示警告界面，并退出运行。 在系统登录界面中，若点击退出系统则显示如图-6所示“确认退出”窗口，单击“确定”按钮，退出系统；单击“否”按钮则返回系统。 图-3 学生信息管理系统主表单main 图-4 图-5 图-6 【任务实现】 在表单中添加以图形控件； 在顶层表单中添加菜单： 1．菜单设计时，在“常规选项”中选择“顶层表单”； 2．在表单main.scx中，设置其