Visual FoxPro 程序设计实验报告

合集下载

[高等教育]VisualFoxProVFP程序设计实验报告05_参考答案_

[高等教育]VisualFoxProVFP程序设计实验报告05_参考答案_

[高等教育]VisualFoxProVFP程序设计实验报告05_参考答案_目录实验一VisualFoxPro基础知识练习实验二数据表的建立与修改实验三数据表的一般操作实验四数据表操作命令练习实验五数据库的设计实验六数据库的操作实验七视图和查询的建立与修改实验八项目管理器的建立与修改实验九SQL关系数据库查询语言实验十结构化程序设计实验十一设计单表表单实验十二自定义表单设计实验十三创建报表实验十四菜单设计实验一VisualFoxPro基础知识练习──────────────────────────────────一、实验目的、要求1.熟悉VisualFoxPro基本操作环境。

2.掌握内存变量的赋值、输出命令。

3.掌握常用函数、表达式的使用方法。

二、实验内容和操作步骤1、VisualFoxPro6.0的启动与退出(1)、从开始菜单启动开始→程序→“MicrosoftVisualFoxPro6.0”,再单击下一级有小狐狸图标的“MicrosoftVisualFoxPro6.0”项,就可以进入VisualFoxPro6.0系统。

(2)、使用快捷菜单启动(3)、退出VisualFoxPro6.02、在VisualFoxPro6.0的选项对话框中配置默认路径:将默认目录改为D 盘:D∶\方法1:使用命令设置:SETDEFATOD∶\方法2:使用工具菜单中选项,在“文件位置”选项卡中按提示操作设置。

3、变量的输入与输出(在命令窗口中输入下列虚线框中的命令,并回答下列问题)(注意:每行为一条命令,每条命令输入后都要按一下回车键,使之执行。

)操作1:求半径等于10的圆面积clear&&清除主工作区屏幕内容R=10&&把10赋给变量RS=3.14159*R*R&&把(3.14159*R*R)的值赋给变量S?”R=”,R&&显示变量R的值?”S=”,S&&显示变量S 的值操作1所用的2个变量名是:R,S2个变量的值分别是:10,314.159操作2:Store3toX,SL,单价?”X、SL、单价3个变量的值分别是:”,X,SL,单价姓名=”×××”&&×××为自己的姓名?”姓名=”,姓名操作2所用的4个变量名是:X,SL,单价,姓名4个变量的值分别是:3,3,3,”×××”4、常用函数的认识及使用1)、数值计算函数练习(在命令窗口中输入下列命令,并写出结果)?exp(4)命令执行结果是:?int(8.98)命令执行结果是:?ABS(-362.2)命令执行结果是:?max(75,82,-90)命令执行结果是:?min(3,-5,10)命令执行结果是:?mod(10,3)命令执行结果是:?Round(3.14159,4)命令执行结果是:?sqrt(8 -4*2*6)命令执行结果是:2)、字符处理函数练习(在命令窗口中输入下列命令,并写出结果)x=“中文VisualFoxPro6.0“?Left(x,4)命令执行结果是:?Right(x,9)命令执行结果是:?substr(x,5,6)命令执行结果是:?Len(x)命令执行结果是:?Lower(‘ABCDE’)命令执行结果是:?Upper(‘mnopq’)命令执行结果是:x=“ABCD“y=“EFGH“?alltrim(x)+y命令执行结果是:3)、常用数据转换函数练习(在命令窗口中输入下列命令,并写出结果)x=“123.56“?VaL(x)命令执行结果是:123.56原来的数据类型为:C 结果的数据类型为:Nx=13.2?Str(x)命令执行结果LACE命令,将空记录中“单位”字段值替换为“合计”;将空记录中“一季度”字段值替换为M1;将空记录中“二季度”字段值替换为M2;将空记录中“三季度”字段值替换为M3;将空记录中“四季度”字段值替换为M4。

VisualFoxPro数据库实验报告

VisualFoxPro数据库实验报告

本科生课程报告课程名称数据库程序设计学院名称核技术与自动化工程学院专业名称学生姓名学生学号教师成绩二〇一八年九月——二〇一八年十二月实验1 Visual FoxPro 使用初步1.1实验目的1.熟悉Visual FoxPro的窗口组成2.掌握Visual FoxPro的启动和退出3.掌握默认工作目录的设置方法4.掌握项目管理器的使用方法1.2实验内容1.用两种方法启动和退出Visual FoxPro。

2.浏览Visual FoxPro的主菜单项及其子菜单。

3.掌握Visual FoxPro的窗口、工具栏、对话框的操作4.练习打开和隐藏命令窗口。

5.在E盘上建立“学生管理”文件夹,并将其设置为默认的工作目录。

6.在“学生管理”文件夹下建立一个项目文件,命为“学生管理.pjx”。

熟悉项目管理器的使用。

实验2 数据及运算2.1实验目的1.掌握变量、常量数组的使用。

2.掌握运算符和表达式的使用。

3.掌握常用函数的使用。

2.2实验内容1.常量的使用2.变量和数组的使用3.运算符和表达式的使用4.字符函数的使用5.数值函数的使用6.日期函数的使用7.数据类型转换函数的使用8.测试函数的使用实验3 自由表的建立与操作3.1实验目的及内容1.掌握自由表结构的建立和表记录的输入表结构的建立表1.8表1.92.掌握表的打开关闭和修改表的浏览操作3.掌握记录的定位与显示,增加与修改,删除与恢复删除sh030008后在sh030001前插入sh030008的记录4.掌握文件管理命令5.掌握索引的建立和索引查询建立四个索引按升序索引后的学生登记表Locate命令的顺序查询Seek命令的索引查询以上两条查询命令实现了逐条查询出性别为女的学生名单。

两图片分别为locate(顺序查询)和seek(索引查询)命令的查询结果及输入命令。

实验3第6题的内容(分析命令及执行结果)6.掌握表的统计操作命令使用repll all ……with……命令分别计算成绩的总分与平均分.7.掌握表的连接和表的临时关联按学号将xs.dbf与cj.dbf连接起来但只包含学号,姓名,数学,政治,英语成绩。

VFP实验报告

VFP实验报告

VFP实验报告一、实验目的本次VFP(Visual FoxPro)实验的主要目的是通过实际操作和实践,深入了解和掌握 VFP 数据库管理系统的基本功能和操作方法,提高我们对数据库的理解和应用能力,培养我们解决实际问题的思维和技能。

二、实验环境操作系统:Windows 10软件版本:Visual FoxPro 60三、实验内容1、数据库和表的创建与操作(1)创建数据库首先,打开 VFP 软件,选择“文件”菜单中的“新建”,在弹出的“新建”对话框中选择“数据库”,然后输入数据库名称,如“student_info”,点击“保存”按钮,成功创建了一个数据库。

(2)创建表在创建好的数据库中,选择“新建表”命令。

根据实验要求,依次输入表的字段名、字段类型、字段宽度等信息。

例如,创建一个“学生信息表”,包含“学号”(字符型,长度 10)、“姓名”(字符型,长度 20)、“年龄”(整型)、“性别”(字符型,长度 2)等字段。

(3)表数据的输入与修改通过“浏览”命令打开创建好的表,输入相应的数据。

在输入过程中,若发现数据错误,可以直接在表中进行修改。

2、数据查询与统计(1)简单查询使用“查询设计器”创建简单查询。

例如,查询所有年龄大于 20 岁的学生信息,在查询设计器中选择“学生信息表”,添加“年龄”字段,并设置查询条件为“年龄>20”,执行查询后得到满足条件的结果。

(2)复杂查询通过连接多个表进行复杂查询。

假设还有一个“成绩表”,包含“学号”、“课程名”、“成绩”等字段,要查询某个学生的所有课程成绩,就需要将“学生信息表”和“成绩表”通过“学号”字段进行连接,然后设置相应的查询条件。

(3)数据统计使用“统计”命令对表中的数据进行统计。

如统计学生的平均年龄、不同性别的人数等。

3、索引和排序(1)索引的创建为表中的字段创建索引,以提高查询效率。

例如,为“学号”字段创建索引。

(2)排序操作使用“排序”命令对表中的数据按照指定字段进行排序,如按照年龄升序或降序排列。

VF实验五

VF实验五
5.其他程序运行命令
(1)清屏命令:clear
功能:清除屏幕上的内容
(2)返回命令:
【命令】return
【功能】结束当前程序的运行
(3)终止程序执行命令:
【命令】cancer
【功能】终止程序执行并关闭所有打开的文件
(4)退出系统命令:
【命令】quit
【功能】终止程序运行,关闭所有打开的文件,退出vfp系统
<命令行序列1>
[loop]
<命令行序列2>
[ exit]
<命令行序列3>
Endfor | next
(3)指针循环
【语句】scan[<范围>] [for<条件表达式1>] [while<条件表达式2>]
<命令行序列1>
[loop]
<命令行序列2>
[ exit]
<命令行序列3>
Endscan
(4)多重循环
3)编辑方式创建类及对象
11.调试程序
(1)调试器窗口的主菜单命令:打开、取消、断点、调速、运行、跳出、单步跟踪、运行到光标处。
(2)调试器应用
1)打开“工具”,选择“调试器”,进入“调试器”窗口;
2)单击“打开”按钮,弹出“添加”对话框,在其中选择需要进行调试的程序名,确认后将在“跟踪”窗口显示要调试的程序;
【说明】①do case和第一个case子句之间不能插入任和命令;②do case和endcase必须配对使用
9.循环结构
(1)条件循环
【语句】do while<条件表达式>
<命令行序列1>
[loop]

Visual Foxpro 实验报告中的实验步骤

Visual Foxpro 实验报告中的实验步骤

实验二表的基本操作(实验步骤)1.实验2-1实验题目:逻辑删除学生档案表(xsda.dbf)中的最后一条空白记录。

实验要求:用命令方式完成。

操作步骤:①打开学生档案表(xsda.dbf)。

(见图2-1)图2-1(实验2-1结果)②在命令窗口键入下列命令go bottomdelete图2-2(实验2-1结果)2.实验2-2实验题目:接实验2-1,物理删除学生档案表(xsda.dbf)中的所有空白记录。

实验要求:任选菜单方式或命令方式完成。

操作步骤:●命令方式:在命令窗口键入下列命令delete all for 入学成绩=0pack图2-3(实验2-2结果)●菜单方式:①打开浏览窗口,选择菜单【表】—【删除记录…】,打开“删除”对话框。

②在“删除”对话框,选择“作用范围”为“All”,单击“For”文本框右侧按钮,打开“表达式生成器”,形成表达式:入学成绩=0,按“确定”后返回“删除”对话框,按“删除”按钮。

②择菜单【表】—【彻底删除】。

图2-4(菜单方式删除表中的记录)3.实验2-3实验题目:按出生日期降序浏览学生档案表(xsda.dbf)。

实验要求:通过建立索引实现。

操作步骤:①打开学生档案表(xsda.dbf)。

②打开表设计器。

③选择“索引”页,在“索引名”列当中键入csrq,单击其左侧的上箭头按钮使之变成下箭头按钮,确定“类型”一栏显示“普通索引”,按“表达式”文本框右边的按钮打开“表达式生成器”。

④在“表达式生成器”中,双击左下方“字段:”列表中的“出生日期”,按“确定”按钮返回表设计器的索引页。

图2-5⑤按“确定”按钮,保存设置关闭表设计器。

⑥选择菜单【窗口】—【数据工作期】。

在“数据工作期”窗口按“属性”按钮打开“工作区属性”对话框,单击“索引顺序:”下拉列表中的Xsda:Csrq,按“确定”按钮回到“数据工作区”窗口,按“浏览”按钮,观察记录的排列顺序。

图2-6(实验2-3结果)⑦依次关闭表记录浏览窗口和“数据工作期”窗口。

Visual FoxPro 课程设计实验报告

Visual FoxPro 课程设计实验报告

Visual FoxPro 课程设计实验报告总结(原创,可修改)20XX年度一.设计题目学生信息管理系统二.开发软件VFP6.0三.课题要求(1) 掌握课堂讲授的基本数据库知识和VFP的基本技巧:1. 数据库管理系统合数据库应用系统;2. VFP的界面组成与操作;3. VFP的工作方式;4. 标的基本操作(表的建立与修改、表达式、维护命令);5. 表的查询与统计(排序与索引,SELECT-SQL查询,数据库于视图);6. 程序设计初步(程序文件,程序的控制,多模块程序)。

(2) 自学部分书本关于VFP的内容:1. 菜单设计;2. 表单设计;3. 表单控件设计;4. 实例:汽车修理管理系统的开发。

(3) 要求能够独立设计。

完成一个简单的学生信息管理系统,此系统必须有如下基本功能:1. 数据的查询;2. 记录的增加,删除,修改等功能;3. 系统界面良好;4. 操作方便,运行稳定。

四.目的掌握基本的数据库知识,熟悉VFP的使用。

学习VFP数据库应用系统开发的一般步骤:1.需求分析2.数据库设计3.应用程序设计4.软件的运行测试通过简单的系统设计、开发,激发学生的学习兴趣和动手能力。

五.设计时间第12周——第19周 六.设计主要流程 流程图:(1) 数据库设计根据此系统需要建立数据库sexxdb.dbc ,数据库中有如下几个数据表:student.dbf 、course.dbf、score.dbf、password.dbf、passwordm.dbf。

student..dbf记录的是学生的个人信息,如:学号、姓名、性别、民族、出生日期、所在专业、籍贯。

Course.dbf记录的是有关课程的信息,如:课程编号、课程名称、学分、任课老师。

Score.dbf记录的是每个同学不同科目的考试成绩,有以下这些内容:课程编号、课程名称、学号、成绩。

Password.dbf记录系统普通用户的用户名和密码。

Passwordm.dbf记录系统管理员的用户名和密码。

实验五VisualFoxpro编程实践

实验五VisualFoxpro编程实践

实验五Visual Foxpro 编程实践实验目的与要求掌握利用Visual Foxpro 编制开发自己的应用程序的实践知识,并学会在程序调试中自 行发现问题和修改程序代码,最终完成应用程序的无错运行。

二.相关知识利用Visual Foxpro 自行开发编制应用程序的步骤:1 .设置好系统的工作环境(尤其注意工作目录的默认设置)。

2.如果是初次进行,应当先建立一个项目,为该项目命名,激活项目管理器。

如果是 接着上次的工作进行,则打开上次工作的本项目,同样也激活项目管理器。

3 •在项目管理器的"数据"T "数据库"下面创建一个娄跳过本步骤)。

并输入少星的正确数据以便将来的运行调试(如果已经创建了数据表,贝I 」跳过本步骤)。

5•在项目管理器的"文档"下面创建该应用程序所用到的所有表单,设计好各表单的 界面并为表单里的控件填写程序代码•(注意为表单添加各自的数据坏境,否则会岀错!) 6■试运行各表单,发现问题后重新修改有问题的表单的代码■反复调试和修改直至最后能无错运行。

7.将应用程序打包发布或制作成安装文件。

三.实验内容与步骤本次实验以一个简单的学生成绩管理系统为例。

首先,对该系统作一个简单的介绍: 该应用系统为完成学生信息和成绩的管理系统f 主要有以下几个应用模块:(1)用户登录管理:系统具有管理员功能,只有取得管理员权限的人才能使用本系统。

库,并命名(如已创建,则4.在项目管理器的库〃 T 〃表〃下面逬行数据表的创建或修改工作,(2) 数据添加功能:对学生基本信息、教师基本信息、班级信息、课程信息、学生成绩信息逬行添加录入。

(3) 数据查询功能:对上述信息的基本查询。

(4) 数据修改功能:对上述信息可进行修改工作。

(5) 统计操作:可分别按个人成绩、单科成绩统计出最高成绩、最{碱绩和平均成绩(6) 打印功能:对上述信息可进行打EH 。

Visual foxpro实验报告终结版

Visual  foxpro实验报告终结版
显示当前系统日期
显示当前系统时间
显示当前系统日期和时间
显示今天是一个星期中的第几天
显示今天的日期
显示今天的月份
显示今天的年份
4、数据类型转换函数
ASC( ),CHR( ),VAL( ),DTOC( ),CTOD( ),STR( )
1)ASC( )函数功能:显示首字符的ASCII码值。如果它的参数是中文字符串,那结果是什么呢?试试如下命令。
1、打开实验一中在a:\ xxxxx\下,用你自己学号创建的项目,用你的学号创建程序文件。
在编辑窗口中输入如下程序:
h=2
r=4
z=3.14*r*r*h/3
?z
运行该程序,查看结果。
2、在vfp中,程序文件的扩展名是什么?运行程序的方法有哪些?说出三种方法。
?STR(456.87,2)
?STR(487010010101)
5、其他常用函数
INKEY( ),TYPE(),IIF( ),MESSAGEBOX( )
写出下列命令的结果
1)?inkey(2)
?inkey(0)
2)?type(‘12’)
?type(‘date()’)
3) ?iif(min(2,0,9)>max(1,-9),”max”,”min”)
?iif(min(2,0,9)>max(-9,-90),"max","min")
说出这两条命令的功能以及结果:
4)显示右图所示的对话框,所使用的命令为:
如果选择“是”按钮,则messagebox( )函数的返回值是多少?
表数据库函数:
Bof()
Dbgetprop()
Dbsetprop()
Dbused()

《Visual FoxPro 6.0程序设计1》实验报告

《Visual FoxPro 6.0程序设计1》实验报告
3、掌握顺序结构、分支结构、循环结构的程序设计方法
实验要求:
1.用do while或for循环语句编程,求1~100的自然数之和、偶数之和、奇数之和,并在屏幕上分行显示。
2.编程找出1~100之间能被7整除的数,并累计这些数之和。
3.求2~100之间的素数,并将这些素数显示出来。
4.分别使用if和do case语句编程,要求从键盘输入一个成绩,判断该成绩属于哪个等级(优秀/良好/中等/及格/不及格),并将该成绩的等级在同一行显示出来。
《Visual FoxPro 6.0程序设计1》实验报告(一)
课程名
《Visual FoxPro 6.0程序设计1》实验
教师姓名
2011 —— 2012学年度第2学期
学生姓名
学生人数
班级
学号
实验题目
VFP程序设计
实验目的
1、熟练掌握常量、变量、表达式、函数的使用
2、熟练掌握命令文件的建立、修改及运行方法
5.将职工表与仓库表建立关联,设置参照完整性(具体规则自行规定)
6.新建一个名为管理的项目,并将公司数据库添加到该项目中;
实验总结:
实验日期
教师评语
2.新建一个名为公司的数据库,并将职工表添加到该数据库中;
3.在打开的公司数据库中,新建一个名为仓库的数据库表,表结构如下,表中包含五条记录(记录内容自行定义)
仓库号C(5),城市C(6),面积N(4)
4.设置职工表中的职工号为主索引,仓库号为普通索引;设置仓库表中的仓库号为主索引,升序;设置职工表中工资字段的有效性规则,相应的出错提示为“工资为1000至5000之间”,工资默认值为2000。
2.掌握索引的建立方法及其作用
3.掌握数据库表的字段有效性规则及其作用

vfp实验报告(一、二)

vfp实验报告(一、二)

实验报告学院:专业:年级:姓名:学号:实验室号:_ 计算机号:实验日期:年月日指导教师签字:成绩:报告退发(订正、重做)实验一:熟悉VFP开发环境一、实验目的(1)熟悉VFP集成开发环境;(2)熟悉项目管理器的使用(3 ) 常用命令的使用二、实验内容1、用命令方式和菜单方式退出VFP系统。

2、设置日期格式为年月日格式,年份四位显示,以短划线”-”作为日期分隔符,设置保存为当前工作期有效。

3、默认工作目录为D盘下每位同学以自己学号命名的文件夹,设置保存为永久有效。

4、在默认路径下建立“学生成绩管理”项目文件和“学生成绩”数据库。

5、记录第4题的命令语句。

三、实验环境(1)硬件:PC机(2)软件:Windows 2000中文操作系统、Visual Foxpro 6.0四、实验步骤1、用命令方式和菜单方式退出VFP系统。

【操作步骤】(1)双击VFP的图标,启动VFP。

(2)在命令窗口中,执行quit命令,退出VFP系统。

(3)再次打开VFP。

(4)点击菜单栏中的“文件”选择“退出”命令,退出VFP系统。

2、设置日期格式为年月日格式,年份四位显示,以短划线”-”作为日期分隔符,设置保存为当前工作期有效。

【操作步骤】(1)从“工具”菜单中选择“选项”命令,打开“选项”对话框。

(2)在“选项”对话框中,选择“区域”选项卡,进行日期格式的设置。

a.设置“日期格式”为“年月日”b.在年份前的小框框内打勾,设置为默认值,点击确定。

c.选中“日期分隔符”复选框,并在对应的文本框中输入短横线“-”。

(3)单击“确定”按钮。

3、默认工作目录为D盘下每位同学以自己学号命名的文件夹,设置保存为永久有效。

【操作步骤】(1)在D盘中,建立以“060102060”命名的文件夹(2)从“工具”菜单中选择“选项”命令,打开“选项”对话框。

(3)在“选项”对话框中,选择“文件位置”选项卡。

(4)在“文件位置”选项卡中,选择“默认目录”。

vfp课程设计实验报告

vfp课程设计实验报告

vfp课程设计实验报告一、教学目标本课程的教学目标是使学生掌握VFP(Visual FoxPro)的基本概念、操作方法和应用技巧。

通过本课程的学习,学生应能熟练使用VFP进行数据库的设计、操作和管理,并具备一定的编程能力。

具体的教学目标如下:1.知识目标:•了解VFP的发展历程和特点;•掌握VFP的基本数据类型、运算符和表达式;•熟悉VFP的数据库和表的基本操作;•掌握VFP的查询、报表和标签等对象的使用;•理解VFP的编程原理和语法。

2.技能目标:•能够使用VFP创建和管理数据库;•能够使用VFP进行数据输入、查询、修改和删除;•能够使用VFP创建简单的表单、报表和标签;•能够使用VFP编写简单的程序。

3.情感态度价值观目标:•培养学生对计算机科学的兴趣和好奇心;•培养学生具备良好的编程习惯和团队协作精神;•培养学生关注信息技术的最新发展。

二、教学内容本课程的教学内容主要包括VFP的基本概念、操作方法和应用技巧。

具体的教学内容如下:1.VFP的基本概念:•VFP的发展历程和特点;•VFP的运行环境和工作原理。

2.VFP的基本数据类型、运算符和表达式:•数据类型的定义和特点;•运算符的分类和用法;•表达式的组成和计算。

3.VFP的数据库和表的基本操作:•数据库的创建和管理;•表的创建、修改和删除;•数据输入、查询、修改和删除。

4.VFP的查询、报表和标签等对象的使用:•查询的创建和执行;•报表的设计和打印;•标签的设计和显示。

5.VFP的编程原理和语法:•程序的组成和结构;•常用编程语句和函数;•程序的调试和运行。

三、教学方法为了达到本课程的教学目标,我们将采用以下教学方法:1.讲授法:通过讲解VFP的基本概念、操作方法和应用技巧,使学生掌握相关知识。

2.案例分析法:通过分析实际案例,使学生了解VFP在实际应用中的重要作用。

3.实验法:安排实验课程,让学生亲自动手操作,巩固所学知识。

4.讨论法:学生进行小组讨论,培养学生的团队协作能力和问题解决能力。

VFP实验报告

VFP实验报告

VFP实验报告第一章visual foxpro数据库管理系统软件操作环境实验一:visual foxpro 集成环境及项目管理(一)、实验内容:一、VFP的启动与退出基本了解了VFP的工作环境以及使用VFP时的启动与退出。

二、工具栏VFP提供了11种工具栏。

其打开与关闭有两种方法。

工具栏中的工具为编辑程序提供了很大的方便。

三、命令窗口1、命令窗口是一个浮动型窗口,其打开和关闭有多种方法。

2、命令窗口是用来输入命令从而实现编程目的的重要窗口。

3、在命令窗口中输入命令后按下回车键便可执行所输入的命令。

4、以*、&&开头的命令是注释处理部分。

5、通过对命令窗口的学习,简单了解了下一些命令:如1+2+3与”1”+”2”+”3”所达到的目的是不一样的。

CLEAR是用于清除VFP主窗口中等所有显示信息。

6、在命令窗口中还可以实现对windows中的应用程序的调用,如运行计算器的命令是:RUN /N CALC。

7、在VFP中重复执行命令是很方便的,只需要选中所需再次执行的命令,按下回车即可,当然还有好几种方式。

四、选项对话框选项对话框是用于对VFP工作环境的设置,对话框中有很多的选项卡,可用于各种要求的设置。

五、创建项目文件1、项目文件保存时需要使用拓展名PJX(相关的备注文件PJT)。

2、对于文件的保存也可以在命令窗口中实现。

例如需将“d:\vfp\实验01”设置成当前文件夹,只需输入“SET DEFZULT TO d:\vfp\实验01”再按下回车即可。

3、保存文件时项目文件名为jxgl。

4、根据实验课本的讲解操作,简单了解了下项目管理器和选项卡,以及利用项目管理器进行添加文件,移去文件。

(二)问题与收获问题:1、对于项目文件的打开,不知道如何打开多个项目文件。

2、对于命令列表中以前执行的命令的清除工作不是很了解。

收获:利用选项卡进行VFP操作环境设置时,结束并确认已做设置的操作有三种,但是三种操作方式是有区别的。

VFP程序设计实验报告2014.3剖析

VFP程序设计实验报告2014.3剖析

《VFP程序设计》实验报告2013~2014学年第二学期班级姓名学号指导教师实验一VFP6中常量、变量、表达式和函数的使用姓名:学号:班级:一、实验目的1.学会Visual FoxPro 6.0中常量和变量的使用,特别是内存变量的使用方法。

2.掌握Visual FoxPro 6.0中表达式的运算和常用函数的使用方法。

二、实验要求1.对上机操作时出现的问题能分析原因并正确解决。

2.做完实验后认真撰写实验报告,操作结果记录在实验报告空白处。

三、实验内容1. 常量的输入和显示依次在命令窗口中输入以下命令,记录并分析运行结果。

(命令执行结果写在每条命令的右边)?6+7*9,-3**2, 3*4%5?”abc ”+”de”?”abc ”-”de”+”fgh”?”我的名字是”李红””?[我的名字是”李红”]?”出版社”$”哈尔滨工程大学出版社”?’哈尔滨大学’$ ’哈尔滨工程大学出版社’?8>100, ”8”>”100” ,”abc”=”ab”?{^1999/09/01}+20,{^1999/09/01}-20?{^1999/09/01}-{^1983/09/01}2. 内存变量、数组的赋值和显示依次在命令窗口中输入以下命令,记录并分析运行结果。

如果给出的命令执行时出错,请写出错误的原因。

A=5B=6?A*BA=”哈尔滨工程大学”B=”出版社”?A+B,A-BDIMENSION A(3,4)?AA(4,5)=7?A(2,3)A(2,3)=7?A(2,3)?A(8)?A(7)命令错误的原因:3. 常用函数的使用方法(1) 字符函数依次在命令窗口中输入以下命令,记录并分析运行结果。

A=”哈尔滨”+SPACE(5)B=”是个美丽的城市”?LEN(A+B),LEN(A-B),LEN(TRIM(A)-B)?SUBSTR(A,3,4)A=”哈尔滨是个美丽的城市”B=”美丽”?AT(B,A)(2) 数值函数依次在命令窗口中输入以下命令,记录并分析运行结果。

vfp实验报告怎么写

vfp实验报告怎么写

竭诚为您提供优质文档/双击可除vfp实验报告怎么写篇一:VFp实验报告(一)VFp实验报告(一)实验目的1、掌握VFp启动和退出的方法。

2、熟悉VFp集成开发环境。

3、掌握项目管理器的基本操作。

4、掌握创建表的操作。

5、掌握表的打开和关闭操作。

6、掌握记录的输入。

7、掌握表的浏览方法。

8、掌握记录的定位、筛选、修改、删除、复制的操作。

实验内容项目管理器的基本操作1、VisualFoxpro的启动方法1:通过“开始”菜单启动VisualFoxpro。

在windows桌面上,依次选择“开始”菜单→“程序”→“microsoftVisualFoxpro”,然后单击即可启动VisualFoxpro系统。

方法2:通过桌面快捷方式启动VisualFoxpro。

直接用鼠标双击桌面上VisualFoxpro的快捷图标即可。

2、VisualFoxpro的退出方法1:在VisualFoxpro的“文件”菜单中,选择“退出”。

方法2:在命令窗口中输入“quit”命令,并按下“enter”键。

方法3:单击VisualFoxpro标题栏右端的“关闭”按钮。

方法4:单击打开VisualFoxpro标题栏左端的“控制”菜单,选择“关闭”项。

3、VisualFoxpro的集成操作环境(1)熟悉VisualFoxpro的使用界面。

认识VisualFoxpro 系统的标题栏、菜单栏、常用工具栏、命令窗口、主窗口、状态栏,如下图所示:(2)菜单栏、工具栏的使用。

学会菜单栏的打开,了解常用菜单命令的功能;了解常用工具栏上命令按钮的功能和相应菜单命令的关系。

(3)命令窗口的使用。

1)了解命令窗口的作用。

2)命令窗口的关闭。

方法1:单击命令窗口的“关闭”按钮。

方法2:按ctrl+F4组合键。

方法3:单击常用工具栏上的“命令窗口”按钮。

3)命令窗口的打开。

方法1:单击常用工具栏上的“命令窗口”按钮。

方法2:按ctrl+F2组合键。

方法3:打开菜单栏上的“窗口”菜单,单击选择则其中的“命令窗口”命令。

visual foxPro实验报告

visual foxPro实验报告

湖北大学知行学院《Visual foxpro数据库程序设计》实验报告姓名 ______周金宇_________班级学号 __**********__2015 年 12 月日目录1.Visual Foxpro 基本操作…………2.常量、变量、表达式和函数………3. Visual Foxpro自由表的创建及基本操作……..4.数据库建立及操作…………5.数据库建立及操作………6.SQL查询………….实验一一、实验目的1.学习Visual Foxpro 6.0的安装2.掌握Visual Foxpro 6.0的启动和退出3.掌握系统环境的设置方法4.掌握项目管理器的基本操作二、实验内容及实验结果1.练习Visual Foxpro 6.0的安装2.练习启动和退出Visual Foxpro 6.03.练习设置系统环境4.练习项目管理器的基本操作三、实验步骤实验1.11.实验分析2. 步骤详解 :在D盘根目录下以典型安装方式安装Visual Foxpro 6.0○1将Visual Foxpro 6.0系统光盘插入光驱中,运行光盘根目录下的文件setup.exe进入Visual Foxpro 6.0安装向导○2单击下一步○3选择接受协议,激活下一步○4在产品号和用户ID界面键入正确的产品号ID和用户信息单击下步○5选择安装类型为典型安装单击更改文件夹按钮,在弹出的对话框中设置Visual Foxpro 6.0的安装位置为d:\vfp60○6单击继续按钮,开始向硬盘复制Visual Foxpro 6.0相关文件,程序安装完成,单击确定按钮实验1.21.实验分析2. 步骤详解○1单击开始并选择程序找到Visual Foxpro 6.0程序单击即可进入○2从桌面上的Visual Foxpro 6.0的快捷方式图标启动○3在我的电脑或资源管理器中找到Visual Foxpro 6.0 VFP.exe 然后运行执行文件○4从Visual Foxpro 6.0中退出返回windows桌面△1用鼠标单击标题栏最右端的关闭按钮△2单击文件中的退出△3在如图所示的命令窗口中数入quit3.命令窗口的显示和隐藏○1单击命令窗口按钮○2单击窗口菜单中的命令窗口○3使用组合键CTRL+F4实验1.3 练习设置系统环境1.实验分析通过实验学生将熟悉Visual Foxpro 6.0中的设置系统环境的基本步骤,掌握常用系统环境的设置操作2.步骤详解○1设置d:\vfp60文件为工作目录○2设置日期格式实验1.4 练习项目管理器的基本操作1.实验分析通过本实验,学生将熟悉项目的建立,项目元素的添加,删除的和浏览。

Visual Foxpro实训实习报告

Visual Foxpro实训实习报告

VFP6.0程序设计实训报告书专业:工程测量与监理班级:0071201姓名:黄文明学号:20123990指导老师:依德萍江西环境工程职业学院2014年06月15日一、摘要本系统是一个面向学校图书馆和书店的图书管理系统,该系统在成功连编之后,可独立的在windows环境下操作,本系统共分为10个独立的模块,可以完成一些基本的图书管理操作,如图书记录录入、图书记录浏览、图书记录修改、图书记录统计、图书记录查询、借书模块、还书模块等功能。

本系统包括项目的建立、数据库的建立、表的有关操作、数据库管理的操作、程序设计常用控件的使用、数据表的表单的程序设计、菜单的设计方法、SQL 语言的使用等。

二、可行性分析Visual foxpro 6.0数据库是微软公司在foxBASE基础上发展起来的一款关系型数据库。

利用Visual foxpro 6.0可以设计出丰富多彩的用户界面在用户界面中可以放置各种控制部件,如命令按钮、图形图片、图表等,在不影响使用的情况下,还增加了主界面的美观。

Visual foxpro 6.0是为数据库应用程序开发而设计的功能强大、面向对象的编程工具。

它能够管理大量复杂的数据信息,同时具有很好的安全性和较强的网络功能,能够实现数据的远程访问和储存加工。

所以从软件上来说,Visual foxpro 6.0的可行性完全符合这次实训作业的完成。

由于学习时间较短。

老师决定以小组完成这次实训作业——《图书管理系统》。

从技术上来说,虽然我们在制作过程中存在许多难点,相信在老师的指导和帮助下。

我们完全可以攻克这些难点。

从技术上来说,Visual foxpro 6.0的可行性完全符合这次实训作业的完成。

Visual FoxPro6.0应用由一系列对象组成,包括有函数、菜单、结构和数据窗口、用户对象、用户事件等等,对象中又包含若干控件如命令按钮、单行编辑器等。

这些对象和控件都可在许多应用中重复使用,从而减短的制作时间,在两周内我们是可以完成这次实训作业,所以在时间上是可行的;三、需求分析随着时光的流逝,人类社会已经悄然进入21世纪。

VF程序设计实验报告册(实践教程)

VF程序设计实验报告册(实践教程)

《Visual FoxPro程序设计》课程实验报告手册学院年级专业姓名学号任课教师上机地点(以上由学生填写)实验教师(签字)西南大学计算机与信息科学学院计算机基础教育系年月日一、实验说明本课程实验分为一般性实验(验证和简单设计)和综合性实验(课程设计)。

一般性实验学生需要按照要求填写阶段性的实验报告,其中包括实验内容、完成情况、小结(问题和收获)。

综合性设计学生需要按照规定格式、规定项目填写综合设计报告。

实验报告将作为实验成绩和综合设计成绩的依据之一。

本课程实验从开课学期第三周开始实习,每周2学时,该课程考试前一周结束实验。

除统一安排的时间外,学生还可根据自己的实际适当安排课余时间上机。

上机内容由任课教师或实验室给定。

基础好的同学可在教师的指导下自选实验内容。

二、实验目的1、进一步加深对关系数据库及DBMS概念的理解。

2、熟练掌握Visual FoxPro提供的对数据库进行操作的各种命令,使自己具有较全面的操作数据库的基本技能。

4、通过编写程序,理解面向过程和面向对象程序设计的特点。

5、掌握上机调试程序的方法和技术,逐步提高调试程序的能力。

6、提高程序设计和编写程序的能力。

三、实验要求1、在完成了阶段性实验后,所有的学生应在“实验报告”中填写本次阶段性实验内容。

2、每次实验课将考勤,并作为实验成绩的重要依据。

4、每次实验前学生必须充分准备每次的实验内容(预习相关知识、书写解题算法和程序代码),以保证每次上机实验的效果。

实验过程中必须独立完成。

5、学期结束时,每位同学应将自己的《综合性设计报告》交各专业班长或学习委员,由班长以专业为单位、按学号从小到大排列好,按照实验指导老师的要求交实验指导教师批改。

否则无成绩。

四、实验报告要求一共要求写三个阶段性实验报告和一个综合性实验报告,与每份实验报告对应产生的电子文档交由实验老师指定的位置,该电子文档也将作为实验成绩评定的依据之一。

五、实验任务书教材:《Visual FoxPro程序设计教程》重庆大学出版社实验参考书:《Visual FoxPro程序设计实践教程》重庆大学出版社实验一:Visual FoxPro环境设置和项目管理器的使用实验目的:熟悉VF界面和项目管理器的使用实验要求:1、熟悉掌握Visual Foxpro6.0启动和退出方法2、熟悉Visual Foxpro6.0的集成环境3、掌握项目的创建、关闭和打开方法4、掌握一般意义上的新建、打开和关闭等基本操作实验内容:验证性实验:实践教程:VFP实验中实验1实验二:Visual FoxPro6.0的基本操作(常量、变量及表达式、常用函数的使用)实验目的:熟悉常量、变量及表达式、常用函数的使用实验要求:1、理解VFP中的各种数据类型,掌握有关变量的各种操作。

Visual-foxpro-程序设计实习报告

Visual-foxpro-程序设计实习报告

Visual foxpro 程序设计实训报告案例—----—教职工信息管理系统开发学生姓名学号指导教师专业班级所在系部一、案例设计的提出及要解决的问题学校的教职工信息管理系统包括教职工基本情况教职工工资情况以及部门工资情况等管理.通过建立“教职工信息管理系统”这样一个基于VisualFoxpor开发的小型数据库应用系统,实现对教职工基本信息以及工资信息的输入、查询、维护、以及输出等功能。

二、案例设计要实现的主要功能以下建立的教职工信息管理系统,包括三个有相互关系的表,并设置了各个表某些字段的属性;通过建立不同类型的视图,实现了对视图的浏览统计和添加等操作;通过建立一个主菜单将要实现的各种功能,用创建不同类型的表单实现与用户进行交互操作的友好界面;通过建立报表,实现对选课成绩等数据的分析整理与输出;最后通过建立主程序项目的连编,形成一个可执行的教职工管理系统,达到快速完成教职工信息查询、工资管理、学习录入等操作的效果。

1.系统登录登录成功进入系统菜单主菜单包括:数据建立、计算查询、工资报表和退出系统。

数据建立子菜单包括:基本情况和工资情况。

计算查询子菜单包括:基本情况查询和工资情况计算。

2.数据建立设计输入基本情况、工资情况和部门工资表信息。

其中,“基本情况信息”表单和“工资情况信息”表单中采用用户命令按钮组实现记录移动。

3.计算查询基本情况查询:根据姓名和部门名称查询相应的记录在相应的记录在表格控件中显示;用工具栏选择显示对应当前记录的基本情况、工资情况和部门情况信息。

工资情况计算:在表单中用一个表格控件显示工资情况,用另一个表格控件显示部门工资汇总情况。

工资报表:报表显示工资情况,每一个部门后汇总的工资汇总。

三、案例设计和操作思路完成“教职工信息管理系统"案例设计的思路如下:(1)编写一个程序文件man.prg作为项目的主文件,由它调用用户登录表单“主界面.scx”。

(2)用户登录成功后,由登录表单调用系统菜单“主菜单.scx”。

  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

VF程序设计实验报告图书馆管理系统专业:学号:姓名:指导教师:2010年12月31日目录第一部分系统概述--------------------------------2 第二部分系统功能模块设计------------------------2 第三部分系统数据库及表设计----------------------2 第四部分系统菜单设计----------------------------5 第五部分系统界面设计----------------------------6 第六部分系统相关程序代码-----------------------13 第七部分实验报告小结---------------------------22 第八部分参考资料-------------------------------22一、系统概述近年来,随着图书馆规模的不断扩大,图书数量相应的增加,有关图书的各种信息量也成倍增加,面对庞大的信息量,传统的人工管理户导致图书管理的混乱,人力与物力过多的浪费,图书管理费用的增加,从而使图书馆的负担过重,影响整个图书馆的运作和控制管理。

因此,为了充分发挥了图书馆的功效,最大限度地为读者服务,必须制定一套合理、有效,规范和实用的图书馆管理系统,对图书资料进行集中统一的管理。

根据上述需要,我们建立本图书馆管理系统。

根据图书、读者和管理员三者之间的关系,本系统主要实现读者对图书的查询、个人信息的修改和管理员对读者、图书的管理。

本系统采用VF6.0作为开发工具。

二、系统功能模块设计本系统可以完成一般图书馆关于图书查询、借阅及书库管理的主要功能。

其中:图书查询模块可以查询所需要的图书;读者管理模块中,读者可以查看自己的信息,对登陆密码进行修改,管理员可以对读者进行添加和删除;图书管理模块中,管理员可以为读者进行图书的借阅和归还操作,以及对图书的信息进行修改,如加入新书、删除不能使用的图书和更新图书的信息;报表打印模块中,实现对需要的信息进行打印输出。

系统结构下图所示。

三、数据库及表设计经分析,图书馆管理系统主要涉及了学生、管理员和图书三部分。

因此需要建立的实体就是学生、管理员和图书三个。

根据系统模块的设计,可以的到本系统需要建立的基本表为:读者信息表、管理员信息表、图书信息表、图书借阅信息表、图书信息表。

数据库的相关设计如下:其中,读者信息表中证号为主索引,图书信息表中总编号为主索引,图书借阅表中对总编号和证号建立普通索引。

表单设计(1)、读者信息表.dbf字段名类型宽度索引证号字符型 6 主索引密码字符型 6姓名字符型8专业字符型10性别字符型 2年级字符型 2院系字符型8照片通用性30备注备注型 4(2)管理员信息表.dbf字段名类型宽度索引证号字符型 4密码字符型 6(3)、图书信息表.dbf字段名类型宽度索引总编号字符型 6 主索引分类名字符型 6书名字符型12作者字符型8出版社字符型20状态字符型 4照片通用型 4(4)、图书借阅信息表.dbf字段名类型宽度索引总编号字符型 6 普通索引证号字符型 6 普通索引借出日期日期型8四、系统菜单设计依据上述系统功能模块的设计,可以得到图书馆主界面菜单:主要包括图书查询、读者管理、图书管理、报表打印和退出。

其中,图书查询执行命do form 图书查询.scx;退出执行命令_vfp.activeform.release;读者管理和图书管理包含子菜单;另外,报表打印的相关设计未能实现。

相关设计如下图:读者管理菜单主要包含读者信息查看、登陆密码修改、读者增添删除三个子菜单。

其中,读者信息查看执行命令do form 读者信息.scx;登陆密码修改执行命令do form 密码修改.scx;读者增添删除执行命令do form读者增删.scx。

相关设计结果如下图:图书管理菜单包含图书借阅、图书归还、图书信息修改三个子菜单。

其中,图书归还执行命令do form 图书借阅.scx;图书归还执行命令do form 图书归还.scx;图书信息修改执行命令do form 图书信息修改.scx。

相关设计结果如下图:五、系统界面设计(1)登陆界面设计用户通过登陆界面进行登陆,选择自己的用户类型,输入证号和密码,如果输入的信息与所连接的表中的数据相符,则进入图书馆的主界面,否则提示错误,直到输入正确信息方能进入系统。

(2)系统主界面设计当用户登陆证号和密码通过验证后,进入图书管理系统的主界面,该界面由一表单及菜单组成。

其中,表单上的”欢迎使用图书馆管理系统!”是一向左移动的动画,以增强界面的友好感。

另外,用户可通过菜单上的各种操作对图书进行管理。

图书馆管理系统的主界面如下:(3)图书查询界面设计用户可以选择查询条件,根据书名、作者、主题词、出版社、总编号其中的一种方式对图书进行查询,查询的结果显示在下边一个表格中。

(4)读者信息查看界面设计管理员可以再次查看读者的信息,点击CommandGroup组中的各个图标可以查看任意一个读者的信息。

(5)读者密码修改界面设计读者可以在此修改自己的密码,修改后的新密码同时在读者信息表中对相应密码进行更新。

(6)读者增添删除界面设计管理员可以在此添加和删除用户,添加和删除的用户信息同时在读者信息表中进行更新。

(7)图书借阅界面设计管理员对读者需要借阅的图书进行借阅操作,输入图书总编号及读者的证号完成图书的借阅流程。

将此借阅的信息保存到图书借阅信息表中。

(8)图书归还界面设计管理员对读者需要需要归还的图书进行归还操作,输入要归还的图书编号及读者证号,在图书借阅信息中进行查找并删除,完成图书归还的操作。

(9)图书信息修改界面设计本界面使用了一个PageCount为3的页框,主要完成图书的添加、删除及信息更新的功能。

下图中,管理员可以对图书进行登记,新书信息将添加到图书信息表中,读者可查阅到。

在本界面中,管理员可以对需要删除的图书从图书信息表中删除,输入要删除的图书的总编号,系统进行查找,若找到则删除,找不到则提示错误。

在本界面中,管理员可以通过输入图书的总编号,查找到需要更新的图书,进入图书更新界面中。

当系统找到对应的图书编号时,进入如下界面。

在此,管理员可以更改图书的各种信息。

六、程序代码1、登陆界面(1)登陆按钮click事件代码:if alltrim(thisform.container1.text1.value)==""messagebox("请输入用户名!")returnendifif alltrim(thisform.container1.text2.value)==""messagebox("请输入密码!")returnendifa=thisform.container1.optiongroup1.valueif a=1use 读者信息locate for alltrim(证号)=alltrim(thisform.container1.text1.value) if found()if alltrim(密码)=alltrim(thisform.container1.text2.value)messagebox("登录成功",64,"身份验证通过")do form 图书馆主界面.scxrelease thisformelsemessagebox("密码输入错误!",16,"错误提示")endifelsemessagebox("读者号不存在!",16,"错误提示")endifelseuse 管理员locate for alltrim(证号)= alltrim(thisform.container1.text1.value) if found()if alltrim(密码)=alltrim(thisform.container1.text2.value)messagebox("登录成功!",64,"身份验证通过")do form 图书馆主界面.scxrelease thisformelsemessagebox("密码输入错误!",16,"错误提示")endifelsemessagebox("用户名不存在!",16,"错误提示")endifendif(2)退出按钮click事件代码:answer=messagebox("你决定退出系统吗?",4,"提示")do casecase answer=6thisform.releasecase answer=7messagebox("请输入用户名和密码",0,"提示")endcase2、系统主界面(1)表单的int事件代码:do 图书馆主界面.MPR with this,.T.THISFORM.Timer1.Enabled = .T.(2)time1的time事件代码:IF bel1.Left+bel1.width>0bel1.Left = bel1.Left-10ELSEbel1.Left = thisform.WidthENDIF3、图书查询界面(1)查询按钮的click事件代码:OPEN DATABASE 图书馆数据库.dbc SHAREDthisform.grid1.recordsource=""m=allt(thisform.text1.value)n=thisform.optiongroup1.valuedo casecase n=1select * from 图书信息 where 书名==m into cursor tempthisform.grid1.recordsource="temp"case n=2select * from 图书信息 where alltrim(作者)==m into cursor tempthisform.grid1.recordsource="temp"case n=3select * from 图书信息 where alltrim(书名) like "%"+m+"%" into cursor tempthisform.grid1.recordsource="temp"case n=4select * from 图书信息 where alltrim(出版社)==m into cursor tempthisform.grid1.recordsource="temp"case n=5select * from 图书信息 where alltrim(总编号)==m into cursor tempthisform.grid1.recordsource="temp"endcasethisform.refresh(2)返回按钮的click事件代码:thisform.release4、读者信息查看界面Commandgroup组的click事件代码:n=this.valuedo casecase n=1go topmandgroup1.buttons(1).enabled=.f.mandgroup1.buttons(2).enabled=.f.mandgroup1.buttons(3).enabled=.t.mandgroup1.buttons(4).enabled=.t. case n=2skip-1if bof()go topmandgroup1.buttons(1).enabled=.f.mandgroup1.buttons(2).enabled=.f.endifmandgroup1.buttons(3).enabled=.t.mandgroup1.buttons(4).enabled=.t. case n=3skip 1if eof()go bottommandgroup1.buttons(3).enabled=.f.mandgroup1.buttons(4).enabled=.f.endifmandgroup1.buttons(1).enabled=.t.mandgroup1.buttons(2).enabled=.t. case n=4go bottommandgroup1.buttons(4).enabled=.f.mandgroup1.buttons(3).enabled=.f.mandgroup1.buttons(1).enabled=.t.mandgroup1.buttons(2).enabled=.t. case n=5thisform.releaseendcasethisform.refresh5、密码修改界面:(1)修改按钮的click事件密码:a=thisform.text4.valueb=thisform.text1.valuec=thisform.text2.valued=thisform.text3.valueif alltrim(a)==""messagebox("请输入账号!")thisform.text4.setfocusreturnendifif alltrim(b)==""messagebox("请输入密码!")thisform.text1.setfocusreturnendifif alltrim(c)==""messagebox("请输入新密码!")thisform.text2.setfocusreturnendifif alltrim(d)==""messagebox("请再次输入新密码!")thisform.text3.setfocusreturnendifuse 读者信息locate for alltrim(证号)==alltrim(a)if found()if alltrim(密码)==alltrim(b)if c==de=messagebox("确定要修改吗?",32+1+0,"提示")if e=1replace 密码 with c for alltrim(证号)==alltrim(a)messagebox("密码修改成功!")endifelsemessagebox("确认密码不正确!请重新输入!")thisform.text2.value=""thisform.text3.value=""thisform.text2.setfocusendifelsemessagebox("密码输入错误!请重新输入密码!",16,"错误提示") thisform.text1.value=""thisform.text2.value=""thisform.text3.value=""thisform.text1.setfocusendifelsemessagebox("证号不存在!",16,"错误提示")thisform.text1.value=""thisform.text2.value=""thisform.text3.value=""thisform.text4.value=""endif(2)返回按钮的click事件代码:release thisform6、读者增删界面(1)command1按钮的click事件代码:open database 图书馆数据库.dbc shareda=allt(thisform.text1.value)b=allt(thisform.text2.value)if a==""messagebox("证号不能为空!",0,"提示")thisform.text1.setfocusreturnendifif b==""messagebox("密码不能为空!",0,"提示")thisform.text2.setfocusreturnendifuse 读者信息locate for 证号=aif found()messagebox("该用户已经存在!",0,"提示")thisform.text1.value=""thisform.text2.value=""thisform.text1.setfocuselseinsert into 读者信息(证号,密码) values (a,b) thisform.text1.value=""thisform.text2.value=""messagebox("恭喜你注册成功!",0,"提示")thisform.text1.setfocusendifuse(2)command2的click事件代码:open database 图书馆数据库.dbc shareda=allt(thisform.text3.value)if a==""messagebox("证号不能为空!",0,"提示")returnendifuse 读者信息locate for 证号=aif found()b=messagebox("确定要删除该用户吗?",1,"提示")if b=1deletepackthisform.text3.value=""messagebox("删除成功!",0,"提示")thisform.text3.setfocusendifelsemessagebox("没有该用户!请重新输入!",0,"提示")thisform.text3.value=""thisform.text3.setfocusendifuse(3) command3的click事件代码:thisform.release7、图书借阅界面(1)借出按钮的click事件代码:OPEN DATABASE 图书馆数据库.dbc SHAREDa=allt(thisform.text1.value)b=allt(thisform.text2.value)c=date()use 图书借阅信息locate for 总编号=aif found()insert into 借书信息 values (a,b,c)messagebox("借书成功!",0,"提示")elseanswer=messagebox("没有该书!是否继续?",1,"提示") if answer=1thisform.text1.value=""thisform.text2.value=""elsethisform.releaseendifendifuseclose database(2)返回按钮的click事件代码:release thisform8、图书归还界面(1)归还按钮的click事件代码:OPEN DATABASE 图书馆数据库.dbc SHAREDa=allt(thisform.text1.value)b=allt(thisform.text2.value)use 图书借阅信息locate for 总编号=a and 证号=bif found()deleteanswer=messagebox("确认是否还书?",1,"提示")if answer=1packthisform.text1.value=""thisform.text2.value=""elserecallendifelsemessagebox("你输入的信息不对,请确认后重新输入!",0,"提示") endifclose database(2)返回按钮的click事件代码:release thisform9、图书信息修改界面(1)page1中的command1按钮的click事件代码:open database 图书馆数据库.dbc sharedzbh=allt(thisform.pageframe1.page1.text1.value)flm=allt(thisform.pageframe1.page1.text2.value)sm=allt(thisform.pageframe1.page1.text3.value)zz=allt(thisform.pageframe1.page1.text4.value)cbs=allt(thisform.pageframe1.page1.text5.value)dj=val(allt(thisform.pageframe1.page1.text6.value))zt=allt(thisform.pageframe1.page1.text7.value)use 图书信息answer=messagebox("确认添加新书吗?",1,"提示")if answer=1insert into 图书信息 values (zbh,flm,sm,zz,cbs,dj,zt)messagebox("添加成功!",0,"提示")elsethisform.pageframe1.page1.text1.value=""thisform.pageframe1.page1.text2.value=""thisform.pageframe1.page1.text3.value=""thisform.pageframe1.page1.text4.value=""thisform.pageframe1.page1.text5.value=""thisform.pageframe1.page1.text6.value=""thisform.pageframe1.page1.text7.value=""endifuseclose database(2)page1中的command2按钮的click事件代码:release thisform(3)page2中的command1按钮的click事件代码:open database 图书馆数据库.dbc sharedzbh=allt(thisform.pageframe1.page2.text1.value)use 图书信息locate for 书名=zbhif found()answer=messagebox("确定要删除该书吗?",1,"提示") if answer=1deletepackthisform.pageframe1.page1.text1.value=""messagebox("删除成功!",0,"提示")endifelsemessagebox("没有此书!请检查重新输入!",0,"提示") thisform.pageframe1.page1.text1.value=""endifuseclose database(4)page2中的command2按钮的click事件代码:release thisform(5)page3中的command1按钮的click事件代码:open database 图书馆数据库.dbc sharedzbh=allt(thisform.pageframe1.page3.text1.value)use 图书信息locate for 总编号=zbhif found()DO FORM 图书信息更新.scxthisform.releaseelsemessagebox("没有该书!请检查重新输入!",0,"提示") thisform.pageframe1.page1.text1.value=""endifuseclose database(6)page3中的command2按钮的click事件代码:release thisform10、图书信息更新界面(1)command1的click事件代码:open database 图书馆数据库.dbc sharedzbh_new=allt(thisform.text1.value)flm_new=allt(thisform.text2.value)sm_new=val(allt(thisform.text3.value))zz_new=allt(thisform.text4.value)cbs_new=allt(thisform.text5.value)dj_new=allt(thisform.text6.value)zt_new=allt(thisform.text7.value)use 图书信息locate for 总编号=zbhif found()if !empty(zbh_new)replace 总编号 with zbh_newendifif !empty(flm_new)replace 分类名 with flm_newendifif !empty(sm_new)replace 书名 with sm_newendifif !empty(zz_new)replace 作者 with zz_newendifif !empty(cbs_new)replace 出版社 with cbs_newendifif !empty(dj_new)replace 单价 with val(dj_new)endifif !empty(zt_new)replace 状态 with zt_newendifmessagebox("更新成功!",0,"提示")elsemessagebox("数据请输入完整!",0,"提示") endifuse(2)command2的click事件代码:release thisform七、实验报告小结经过近两周的设计和开发,本图书馆管理系统基本实现了一个图书馆所必须的简单功能。

相关文档
最新文档