大一VF综合实验报告-VF.docVIP

华北科技学院计算机学院综合性实验报告 PAGE 第 PAGE 9 页 华北科技学院计算机学院综合性实验 实 验 报 告 课程名称 程序设计语言(VF) 实验学期 2013 至 2014 学年 第 二 学期 学生所在院部 外国语学院 年级 2013 专业班级 英语B13-1 学生姓名 陈杨 学号 201304024130 任课教师 王晓菊 实验成绩 计算机学院制 《程序设计语言(VF)》课程综合性实验报告 开课实验室： 基础实验室 年 月 日 实验题目 学生信息管理系统的设计与实现 一、实验目的 掌握应用程序设计规划的基本方法； 掌握使用VF设计简单的查询系统； 掌握数据表的建立，及表单控件与数据源的连接方法； 掌握查询、修改、添加、删除记录的基本实现方法 二、设备与环境 PC兼容机、Windows系列操作系统、Visual FoxPro数据库编程环境 三、实验内容 （一）设计 要求：设计一个学生信息管理系统，其功能包括系统的登陆、学生信息、课程信息和成绩信息的添加/删除、根据不同条件进行模糊查询等。 （二）设计4个自由表； 包括：密码表、学生表、课程表、成绩表，表中记录按照课本填入，也可自行填入，每个表中都要有关于个人的真实信息，每个表记录数不得少于10条。 （三）欢迎界面 （四）学生管理系统登陆界面 （五）系统主界面 （六）查询模块 （七）信息添加/修改界面 四、实验结果及分析 (一)数据表 （二）欢迎界面 关键属性：timer1的interval=200 Image1的stretch=等比填充 关键代码： Image1的click事件代码：thisform. release do form login.scx timer1的click事件代码：if thisform.label6.left+thisform.label6.width0 thisform.label6.left=thisform.width else thisform.label6.left=thisform.label6.left -10 endif （三）登录界面 关键属性：form1的maxbutton=.f. minbutton=.f. controlbox=.f. showtips=.t. combo1的controlsource=passwd. 用户名 tooltiptext=请输入用户名 text2的tooltiptext=请输入密码 关键代码： Command1的click事件： set exact on i=i+1 select passwd locate for alltrim(用户名)=alltrim(bo1.value) if found()and alltrim(密码)=alltrim(thisform.text1.value) set exact off release thisform do form main else if i3 messagebox(账号或密码错误，请重试!,48,警告) bo1.value= thisform.text1.value= bo1.setfocus else messagebox(非法用户，系统无法启动!,16,警告) release thisform endif endif （四）主界面 关键属性： ShowWindow=2 Timer1的interval=200 Image1的stretch=等比填充 关键代码： Timer1的timer事件代码：if thisform.Image1.left+thisform.Image1.width0 thisform.Image1.left=thisform.width else thisform.Image1.left=thisform.Imag