Visual FoxPro成绩查询表单制作技巧

……………一一　…………　……………………　一…　…　

实用第一　智慧密集　

．，，＝　，　．．　．　。　，　．　，　

Ｖｉｓｕａｌ　ＦｏｘＰｒｏ成绩查询表单制作技巧　

李晓明　

（华东理Ｔ大学，　海２００２３７）　

摘要：数据库管理系统是目前在企事业单位管理中应用十分广泛的一类管理软件，在国内以Ｖｉｓｕａｌ　ＦｏｘＰｒｏ　ｆ以下　

简称ＶＦＰ）最具代表性　ＶＦＰ提供了结构化程序设计和面向对象程序设计这两种设计方式，并成功地将两者有机地　

结合起来，使应用程序的开发变得易行、高效，是一种实用的数据库开发工具。以制作学生成绩查询表单为例，介　

绍ＶＦＰ面向对象程序设计和可视化编程的方法、设计思路及步骤．．　

关键词：ＶＦＰ数据库系统；表单；对象；赋值；查询　

以ＶＦＰ为背景的数据库系统的使用、管理和开发．在日　

常生活中已得到广泛的应用。在目前应用的管理信息系统巾，　

用ＤＢＦ文件做数据　｝］问交换的占大多数。全国高等学校非计　

算机专业学生计算机等级考试Ｖｉｓｕａｌ　ＦｏｘＰｒｏ数据库程序设计　

教学大纲要求必须掌握数据库系统的基础知识、面向对象的　

名称，课程代码，课程名称）　

２表单界面　

如罔１所示　

■　■■■■日ｑ　《　％　％　辨　———鬻　—一＝　

查诲一学生成靖　

蛙捧学生年疆：＿ｌｌｌＥ　；　

概念、关系数据库的基本原理、数据库程序设计方法和使用　

Ｖｉｓｕａｌ　ＦｏｘＰｒｏ建立一个小型数据库应用系统等５项内容　南此　

可见，了解并熟悉乃至熟练掌握ＶＦＰ程序设计与运用，对于　

Ｔ作和学习都会有较大的帮助。　

下面以学生各学期成绩查询、输　为例．针对面向过程　

｝　

，　

ｉ　

　Ｉ

Ｒ　●田　

Ｉ　

；　

　Ｔ　Ｉ

　｛

遘捧夸韭代爵　

，

　８　Ｊ

ｅ　

ｉ１０　

１１　

＇　

　ｌ５　

造耩攀生掌号　

．１　

¨　

ｒ十　

２０　

程序设计、数据表的操作、表单设计与制作、面向对象的编　

程与控件属性设置、关系数据库标准语言ＳＱＬ查询与报表的　

制作等，作较为细致的介绍　

｝　

Ｅ８ｔ　

§蟪ｌ　Ｉ・　

１　銎　

ｅｉ　ｅ・・｝嚣　

鼍￥Ｉ　琴　；　｛ｉＲ；转　＃　＃　

ｌ数据说明　

涉及的数据表结构（最简结构１　

（１）学生信息（ｘｓ＋ｎｄ，如ｘｓ１９９９、ｘｓ２０００等）：　

｛ＸＨ（Ｃ，８）：ｘｆ　（ｃ　８）；ＺＹＤＭ　（Ｃ，３）＝ＺＹＭＣ《Ｃ．３０）：ＨＳＺＤＭ（Ｃ．３）：　

ＨＳＺＭＣ（Ｃ，３Ｏ”　

图１查询成绩表单界面　

２．１控件说明　

在面向对象程序设计中，现实世界的事物均可以抽象为　

对象，表单上的命令按钮等是对象，表单本身也是对象。　

成绩查询的操作表单如图１所示。它包括表单、标签、　

文本框、组合框、命令按钮、编辑框和表格等控件。其中的　

主要控件的属性如表１所示　

表１　表单主要控件的部分属性　

控件　类名称　ＲｏｗＳｏｕｒｃｅ　ＲｏｗＳｏｕｒｃｅＴｙｐｅ　

字段说呢：　（学号，姓名，专业代码，专业名称，院系站　

代码，院系站名称）　

（２）学生成绩（ｃｊ＋ｎｄ）：　

｛ＸＨ（Ｃ，８　ＸＭ｛Ｃ，８）；ＫＣＤＭ（Ｃ，８）；ＺＣＪ（Ｃ，１　Ｏ）：ＸＱＳ（Ｃ，１）｝　

字段说明：　（学号，姓名，课程代码，课程名称，课程　

成绩，学期数）　

（３）院系站：　

｛ＨＳＺＤＭ（Ｃ，２）；ＨＳＺＭＣ（Ｃ，２０）｝　

学生年级　

院系站代码　

专业代码　

学号　

成绩列表　

组合框　

组合框　

组合框　

组合框　

列表　

２００１，２００２，２００３．…等　

无　

无　

无　

无　

ｌ一值　

６一字段　

６一字段　

６一字段　

１一别名　

字段说明：　（院系站代码，院系站名称）　

（４）专业名称：　

｛ＺＹＤＭ（Ｃ，３）：ＺＹＭＣ（Ｃ　３０）｝　

注：　数据将南后面的程序赋值。　

列表的属性应该是ＲｅｃｏｒｄＳｏｕｒｃｅ和ＲｅｃｏｒｄＳｏｕｒｃｅＴｙｐｅ　

字段说明：　（专业代码，专业名称）　

（５）课程信息：　

｛ＺＹＤＭ｛Ｃ　３）；ＺＹＭＣ《Ｃ，３０）；ＨＳＺＤＭ（Ｃ　２）：ＨＳＺＭＣ｛Ｃ，３Ｏ）：　

ＫＣＤＭ　；ＫＣＭＣ（Ｃ　４０）、　

作者简介：李晓明（１９５５一），男，Ｔ程师，学士，研究方向：　

计算机信息管理与研究生教育管理。　

收稿日期：２０１４—１１－１７　

字段说明（专业代码，专业名称，院系站代码。院系站　

ｉｉ２０　１５．０３

电■■疆技巧与簟护　●与‘　　

．　．

Ⅱｍ阻　＆ＩＮＦＯＲ删盯ｉＯＮ啊＾ＩＩ柏　…………．…………　………………　………………．………　

２．２控件赋值　

ｍｈｓｚｄｍ＝ｈｓｚｄｍ．ｈｓｚｄｍ　

２．２．１“院系站”组合框　

ｍｄｍ＝ｔｈｉｓ．ｖａｌｕｅ　

ｔｈｉｓｆ０ｒｍ．ｚｙｄｍ．ｒｏｗｓｏｕｒｃｅｔｙｐｅ＝Ｏ　

通过点击年级组合框，通过ＳＱＬ查询该年度学生库，将　

筛选获得的该年绒巾所有的院系站代码和名称赋值给“院系　

站”组合框。　“年级”控件的Ｖａｌｉｄ（）代码为：　

ｉｆ！ｆｉｌｅ（　ｄｂｆ￣ｓ＆ｘｓｎｄ．．ｄｂｆ　）　

ｉｆ　ｕｓｅｄ（　ｚｙｄｍｍｃ　）　

ｓｅｌｅ　ｚｙｄｍｍｃ　

ＵＳｅ　

ｅｎｄｉｆ　

ｓｅｌｅ　ｚｙｄｍ，ｚｙｍｃ：　

ｆｒＯｍ　ＸＳＸＸ：　

ｄｉｓｔ：　

ｉｎｔｏ　ｃｕｒｓｏｒ　ｚｙｄｍｍｃ　

ｗｈｅｒｅ　ｈｓｚｄｍ＝ｍｄｍ　

ｔｈｉｓｆＯｒｍ．ｚｙｄｍ．ｒｏｗｓｏｕｒｃｅ＝　ｚＶｄｍｍｃ　ｚｙｄｍ　ｚｙｍｃ　

＝ｍｅｓｓａｇｅｂｏｘ（　＆ｘｓｎｄ．年度的学生库不存在，请重新选择（或　

建学生库）！　，１６，　系统警告　）　

ｒｅｔｕ．ｆ．　

ｅｎｄｉｆ　

＆＆提示如果该年度学生库不存在必须新建库　

ｉｆ　ｕｓｅｄ（　ＸＳＸＸ　）　

ｓｅｌｅ　ＸＳＸＸ　

Ｕｓｅ　

ｔｈｉｓｆＯｒｍ．ｚｙｄｍ．ｒｏｗｓｏｕｒｃｅｔｙｐｅ＝６　

ｔｈｉｓｆＯｒｍ．ｒｅｆｒｅｓｈ　

ｅｌｓｅ　

＆＆设置“专业代码”组合框的值（学生库中院系站代　

码＝选中的代码）　

ｕｓｅ　ｄｂｆｋｘｓ＆ｘｓｎｄ：　

ａｌｉａｓ　ＸＳＸＸ：　

ｉｎ　Ｏ：　

ｓｈａｒ　

注：因为“专业代码”赋值必须与选中的院系站选对应，　

故必须是Ｃｌｉｃｋ０。　

ｅｎｄｉｆ　

鼠标点击“院系站”组合框后“专业代码”已赋值，如　

图３所示。　

＆＆如果学生库已打开，转到该工作区，并给别名ＸＳＸＸ　

ｓｅｌｅ　ｈｓｚｄｍ，ｈｓｚｍｃ：　

ｆｒＯｍ　ＸＳＸＸ：　

ｉｎｔｏ　ｃｕｒｓｏｒ　ｈｓｚｄｍ：　

ｄｉｓｔ　

ｔｈｉｓｆｏｒｍ．ｈｓｚｄｍ．ｒｏｗｓｏｕｒｃｅｔｙｐｅ＝６　

ｔｈｉｓｆｏｒｍ．ｈｓｚｄｍ．ｒｏｗｓｏｕｒｃｅ＝　ｈｓｚｄｍ．ｈｓｚｄｍ。ｈｓｚｍｃ　

ｔｈｉｓｆｏｒｍ．ｒｅｆｒｅｓｈ　

查询一学生成绩　

选择学生年缎：ｌ即

酸系站代码：ｌ●口　

二二二二

选择专业代玛：　

＆＆给“院系站”组合框赋值　

赋值后院系站下　列表女ｆ１　２所示　

图３　“专业代码”组合框获得赋值　

２．２．３“学生学号”组合框　

确定了学生库中院系站、々，ｌｋｆ￣码之后，就能给“学生　

学号”组合框赋值。　“专业代码”组合框的Ｃｌｉｃｋ０代码为：　

ｍｚｙｄｍ＝ｔｈｉｓ．ｖａｌｕｅ　

ｓｅｌｅ　ＸＳＸＸ　

ｓｅｔ　ｆｉｌｔｅｒ　ｔｏ　ｈｓｚｄｍ＝ｈｓｚｄｍ．ｈｓｚｄｍ：　

．

ａｎｄ．ｚｙｄｍ＝ｍｚｙｄｍ：　

图２院系站组合框获得赋值　

ａｎｄ　！，退学　￥ｂｚ　

＆＆屏蔽掉已退学的学生　

．

注：在控件火去焦点之前，将发生Ｖａｌｉｄ事件。　

２．２．２“专业代码”组合框　

ｔｈｉｓｆｏｒｍ．ｚｙｍｃ．ｃｏｎｔｒｏｌｓｏｕｒｃｅ＝　ｚｙｄｍｍｃ．ｚｙｍｃ　

ｔｈｉｓｆＯｒｍ．ｚｙｍｃ．ｖｉｓｉｂｌｅ＝。ｔ．　

ｔｈｉｓｆＯｒｍ．ｘｈｘｍ　ｒｏｗｓｏｕｒｃｅ＝　ＸＳＸＸ．ｘｈ，ｘｍ　

ｔｈｉｓｆｏｒｍ，ｒｅｆｒｅｓｈ　

选定院系站后．可以确定学生库中为该院系站的学生，　

并选取这些学生的　业代码和专业名称作为“々业代码”组　

合框的值。　“院系站”组合框的Ｃｌｉｃｋ（）代码为：　

ｓｅｌｅ　ｘｓＸＸ　

＆＆“学生学号”组合框被赋值：学号、姓名。　

２．３赋值要领　

ｓｅｔ　ｆｉｌｔｅｒ　ｔｏ　ｈｓｚｄｍ＝ｈｓｚｄｍ．ｈｓｚｄｍ　

通过设定年度一获得院系站的值，选定院系站一给专业　

代码赋值，选定专业代码一最后确定“学号姓名”组合框中　

的值。赋值的代码可以是数据库（表）的操作语句、可以是　

数据表的过滤语句、也可以是ＳＱＬ查询语句等等。　

＆＆以院系站代码作筛选依据　

ｔｈｉｓｆｏｒｍ．ｈｓｚｍｃ．ｃｏｎｔｒｏＩｓｏｕｒｃｅ＝　ｈｓｚｄｍ．ｈｓｚｍｃ　

ｔｈｉｓｆ０ｒｍ．ｈｓｚｍｃ．ｖｉｓｉｂｌｅ＝．ｔ．　

删画２　０１５＿骊．０３　，ＳＹ

￣！，，＂

／Ｘ　

’……………　‘　

实用第一　智慧密集　

３数据查询　

３．１　查询中数据表的建立　

３．１．１设计思想　

ｉｆ　ｓｕｂｓ（ｍｘｈ，１，１）＝　９　

ｑｓｎｄ＝　１　９　＋ｓｕｂｓ（ｍｘｈ，１，２）＆＆２０００年前的处理　

ｅｔｓｅ　

数据表设计需要对于一个给定的应用环境，构造最优的　

数据表模式，建立数据表及其应川系统，使之能够有效地存　

储数据，满足各种用户的应用需求（信息要求和处理要求）。　

本案中．学生表、成绩表均按年度建立，并且已经录入了　

被查询数据　

３．１．２查询程序结构　

ｑｓｎｄ＝　２０　＋ｓｕｂｓ（ｍｘｈ，１，２ｌ　

ｅｎｄｉｆ　

ｑｓｘｑ＝　１　

ｄｏ　ｗｈｉｌ　ｆｉｌｅ（　ｃｊ＆ｑｓｎｄ．．ｄｂｆ　）　

ｓｅｌｅ　ｃｊ＆ｑｓｎｄ。　ｘｈ，：　

ｃｊ＆ｑｓｎｄ．．×ｍ，：　

ｃｊ＆ｑｓｎｄ．．ｋｃｄｍ，：　

ｃｊ＆ｑｓｎｄ．．ｚｃｊ．：　

ｋｃｋ．ｋｃｍｃ，：　

查询中．多以ＪＩ￣Ｈ￣库（中间库）、数组完成数据存储与调用。　

３．１－３“个人总成绩单”命令按钮Ｃｌｉｃｋ（）代码　

ｉｆ　ｕｓｅｄ（　ＸＳＺＣＪ　）　

ｋｃｋ．ｘｆ：　

ｓｅｌｅ　ＸＳＺＣｊ　

ｅｌｓｅ　

ｓｅｌｅ　０　

ｃｒｅａ　ｃｕｒｓｏｒ　ｘｓｚｃｌ　

ｆ『ｏｍ　ｃｊ＆ｑｓｎｄ。ｋｃｋ：　

ｗｈｅｒｅ　ｍｘｈ￥ｃｊ＆ｑｓｎｄ．．ｘｈ；　

ａｎｄ．ａｌｌｔ（ｋｃｋ．ｋｃｄｍ）＝＝ａｌｌｔ（ｃｊ＆ｑｓｎｄ．．ｋｃｄｍ）：　

．

ａｎｄ．ｃｊ＆ｑｓｎｄ。．ｘｑｓ＝＝ｑｓｘｑ：　

．

ａｎｄ．ｍ．ｘｓｎｄ￥ｋｃｋ．ｓｄｒｑ：　

（ｘｈ　ｃ（８）．：　

ｘｍ　ｃ（８）．：　

ｋｃｄｍ　ｃ（８）．：　

ｄｉｓｔｉｎｃｔ　＆＆．唯一性　

ｚｃｊ　ｃ（１Ｏ），：　

ｋｃｍｃ　ｃ（３０）　：　

ｘｘｈ　ｃ（８ｌ，　

ｉｎｔｏ　ａｒｒａｙ　ｘｓｃｊＯ０　

＆＆用ＳＱＬ查询将所得某学期成绩装入数组ｘｓｃｊＯ０中　

ｉｆ

ｔａｌｌｙ＞Ｏ　＆＆当数组不为空　

＿

ｓｅｌｅ　ｘｓｚｃｊＯ　

ａｐｐｅ　ｆｒｏｍ　ａｒｒａｙ　ｘｓｃｊＯ０＆＆所得成绩添加到中间库中　

ｒｅｐｌ　ＸＸＳｊ　ｗｉｔｈ　ｑｓｎｄ＋ｑｓｘｑ　ｆｏｒ　ｅｍｐｔｙ（ｘｘｓｊ）＆＆学习时间　

＆＆为空，则代入对应年度学期　

ｅｎｄｉｆ　

ＸＸＳｊ　ｃ（５））　

ｅｎｄｉｆ　

＆＆“ＸＳＺＣＪ”为最终查询成绩汇总库　

ｉｎｄｅ　ｏｎ　ｘｈ　ｔａｇ　ｘｓｚｃｊＯ　

ｓｅｌｅ　ＸＳＸＸ　

ｒｅｌｅ　ｘｓｃｊＯ０＆＆将数组变量清除　

ｉｆ　ｑｓｘｑ＝　＾２＆＆如果秋季学期，　年度需加１。　

ｑｓｎｄ＝ｓｔｒ（ｖａｌ（ｑｓｎｄ）＋１，４）　＆＆先改为数值型加１，然后　

＆＆再改为字符型取回　

ｅｎｄｉｆ　

开始生成成绩库　

ｍ

—

ｒｅｃｏ＝ｌ　

ｍｒｅｃｏ＝Ｏ　

ｇｏ　ｔｏｐ　

ｑｓ×ｑ＝ｉｉｆ（ｑｓｘｑ＝　１　．　２　，　１　）　

ｄｏ　ｃａｓｅ　

ｄｏｗｈｉｌ！ｅｏｆ（）　

ｍｒｅｃｎ＝ｒｅｃｎ（）　

ｃａｓｅ　ｖａｌ（ｑｓｎｄ）一ｙｅａｒ（ｄａｔｅＯ）＞Ｏ　＆＆起始年度大于当　

ｉｆ　ｕｓｅｄ（　ｘｓｚｃｊＯ　）　

ｓｅｌｅ　ｘｓｚｃｊＯ　

ＵＳｅ　

＆＆前年度建库结束　

ｗａｉｔ　ｗｉｎｄ　＆ｍｘｈ．建库结束！　ｔｉｍｅ．１　

ｃａｓｅ！ｆｉｌｅ（　ｄｂｆｋｃｊ＆ｑｓｎｄ．．ｄｂｆ　）．ａｎｄ．！ｖａｌ（ｑｓｎｄ）一ｙｅａｒ（ｄａｔｅＯ）＞Ｏ　

ｅｎｄｉｆ　

＝ｍｅｓｓａｇｅｂｏｘ（　缺少［＆ｑｓｎｄ．Ｊ年度成绩库　，４８，　系统　

查错　）　

ｏｔｈｅ　

Ｉ（）０Ｄ　

＆＆ｘｓｚｃｊＯ作为（临时）中间库，完成一个循环必须关　

＆＆闭重建　

ｓｅｌｅ　０　

ｃｒｅａ　ｃｕｒｓｏｒ　ｘｓｚｃｊＯ：　

ｌｘｈ　ｃ（８），　

ｘｍ　ｃ（８），：　

ｋｃｄｍ　ｃ（８），　

ｅｎｄｃａｓｅ　

ｅｘｉｔ　

ｅｎｄｄｏ　

ＺＣｊ　ｃ（１Ｏ）　：　

ｋｃｍｃ　ｃ（３０），；　

ｘｘｈ　ｃＩ８），：　

ＸＸＳｉ　ｃ（５））　

ｓｅｌｅ　ＸＳＸＸ　

ｍｘｈ＝ｘｓｘｘ．ｘｈ　

ｍｘｍ－－ｘｓ×ｘ　ｘｍ　

ｉｆ　ｕｓｅｄ（　ｘｓｚｃｊＯ　）　

ｓｅｌｅ　ｘｓｚｃｊＯ　

ｇｏ　ｔｏｐ　

．ｆ！ｅｏｆ（）　

ｃｏｐｙ　ｔｏ　ａｒｒａｙ　ｘｓｚｃｊＯ　

ｓｅｌｅ　ＸＳＺＣｊ　

ａｐｐｅ　ｆｒｏｍ　ａｒｒａｙ　ｘｓｚｃｊＯ　

ｒｅｌｅ　ｘｓｚｃｊＯ　

４　ｉｉ２０ｊｉ１５丽．０３

电■■程技巧与簟妒　ｌ与簟　目　

Ｄ＾Ｔ＾¨ＳＥ＆ＩＮＦＯＲＭＡＴＩＯＮ　Ｍ＾＿＾ＢＥ　．．…．…。一……　一　…　

ｅｎｄｉｆ　

ｅｎｄｉｆ　

…＋　．　　ｔ．　一　…　

＆＆中间库ｘｓｃｊＯ不为空，赋值给数组ｘｓｃｊＯ，然后将数组　

＆＆添加进成绩总库　

ＳｅＩｅ　ｘｓｘｘ　

ｇｏ　ｍｒｅｃｎ　

ｓｋｉｐ　

ｅｎｄｄｏ　

ｓｅｌｅ　ｚｙｄｍｋ　

ｓｅｔ　ｏｒｄｅ　ｔｏ　ｚｙｄｍ　

＆＆建立专业代码库索弓　

Ｉｆ！ｕｓｅｄ（　ｈｓｚ　）　

ｓｅｌｅ　０　

ｕｓｅ　ｈｓｚ　

ｅｌｓｅ　

ｓｅｌｅ　ｈｓｚ　

ｅｎｄｉｆ　

图４　

Ｉｏｔａ　ｆｏｒ　ａｌｌｔ（ｈｓｚｄｍ）＝ｓｕｂｓ（ｘｓｚｃｊ。ｋｃｄｍ，１，２）　

ｓｅｌｅ　ＸＳＺＣｊ　

ｔｈｉｓｆＯｒｍ．ｍｎｓｃ．ｅｎａｂｌｅｄ＝．ｔ．　

ｔｈｉｓｆｏｒｍ．ｓｃｄｙ．ｅｎａｂｌｅｄ＝．ｔ．　

ｌ　套袖一－釜ｔ　＿Ｉ　盛　匝二二兰竺　＝二二　显　兰竺　１Ｉｊ　

ｉｌ　芒　］　］　

ｌ　一　三　

ｉｓ：　

ｔｈｉｓｆｏｒｍ。ｄｊｂ１．ｅｎａｂｌｅｄ＝．ｔ．　

＆＆打开其他按钮　

ｔｈｉｓｆｏｒｍ．ｍｘｓｚｃｊ　ＲｅｃｏｒｄＳｏｕｒｃｅ＝　Ｘｓｚｃｊ　＆＆指定表格豹　

＆＆数据源　

ｇｏ　ｔｏｐ＆＆指针回到首记录　

ｔｈＩｓｆ０ｒｍ．ｍｘｓｚｃｊ．ｃｏｌｕｍｎ１　ＣｏｎｔｒｏｌＳｏｕｒｃｅ＝　ｘｓｚｃｊ．ｚｃｊ　

＆＆学习成绩列绑定ｚｃＩ字段　

ｔｈｉｓｆｏｒｍ．ｍｘｓｚｃｊ．ｃｏｌｕｍｎ２．ＣｏｎｔｒｏｌＳｏｕｒｃｅ　＝＇ＸＳＺｃｉ　ＸＸＳｉ　

ｌ　

ｌ　

ｌ　ｌ害　薹　

＆＆学习时间列绑定ＸＸＳｊ字段　

ｔｈｉｓｆｏｒｍ．ｍｘｓｚｃｊ．ｃｏｌｕｍｎ３　ＣｏｎｔｒｏｌＳｏｕｒｃｅ＝　ｘｓｚｃ］　ｋｃｍｃ　

＆＆课程名称列绑定ｋｃｍｃ字段　

ｔｈｉｓｆＯｒｍ．ｒｅｆｒｅｓｈ　

ｒｅｐｏ　ｆｏｒｍ　ＳＣ—ｇｒｚｃｊ　ｔｏ　ｐｒｉｎ　ｐｒｏｍ　ｐｒｅｖ＆＆将数据输出到　

报表，如图５所示。　

３．２程序解析　

（１）以临时表的形式存储查询后的个人成绩（ＸＳＺＣｊ）。　

（２）以临时表的形式作为中间存储表（ｘ￣ｚｄＯ）。　

（３）将　到的每学期成绩存储到数组（ｘｓｚｃｊＯ０）。　

（４）　数组（ｘｓｃｊＯ０）不为空，导人中间表（ｘｓｚｃｊＯ），并　

Ｉｊ＿代入学习时间　

（５）将『ｆＩ问仔储表数据导入总成绩表。　

（６）按常规第一学期在下半年，当学期等于２时，年度　

需ＪＪｌ】１　

（７）循环、血　完成．　．

ｆ　：　

．

为程序是以学号为火键字的总成绩表，所以首先　

以ＸＳＺ（・作为叶１问存储（临时表），每次循环应该清空，但是

ｉｏ　

ｆｌｔ￣Ｈｔ，衷是县渎状念，故只能关闭后重建。　

３．３流程图　

程序的运行流程如冈４所示　

“个人总成绩　”命令按钮点击后，表单界面如同５所示、、　

穗２　０１５　．０３　＇６５　

…　……………　……　…　…　……　………………　

实用第一　智慧密集　

……　…　．　．…．　．．…．…．……　．…　…　……　

；　

【ＰＬＡＩＮｌ　

【ＲＡＮＧＥ　ｎＳｔａｒｔＰａｇｅ【，ｎＥｎｄＰａｇｅ］】　

【ＰＲＥＶＩＥＷ【［ＩＮ】ＷＩＮＤＯＷ　ＷｉｎｄｏｗＮａｍｅ　Ｉ　ＩＮ　ＳＣＲＥＥＮｌ　

【ＮＯＷＡＩＴ］】　

【ＴＯ　ＰＲＩＮＴＥＲ【ＰＲＯＭＰＴ】ｌ　ＴＯ　ＦＩＬＥ　ＦｉｌｅＮａｍｅ２【ＡＳＣＩＩ］ｌ　

【ＮＡＭＥ　ＯｂｊｅｃｔＮａｍｅ】　

【ＳＵＭＭＡＲＹ】　

本例使用的命令为ｒｅｐｏ　ｆｏｒｍ　ＳＯ—ｇｒｚｃｊ　ｔｏ　ｐｒｉｎ　ｐｒｏｍ　ｐｒｅｙ　

４．２．２子句的应用　

图６数据分组示意　

ＰＲＥＶＩＥＷ［［ＩＮ】ＷＩＮＤＯＷ　ＷｉｎｄｏｗＮａｍｅ　Ｉ　ＩＮ　ＳＣＲＥＥＮ】：　

２）列标头。在列标题区域插入标签、域控件和线条．并　

将控件与表头字段绑定，如罔７所示。　

＾女　ｊ　

以页面预览模式显示报表，　不把报表送到打印机巾打印。　

要打印报表，命令必须带ｌＴＯ　ＰＲＩＮＴＥＲ１子句　、　

使ｊ｛ｊ该子句可以在报表设汁器中预览报表，预览窗【１有　

“打印预览”Ｔ具栏，方便对打印要求进行设置并输…．如图　

９所示　

总

业ｇ槔ｔｋ垤　

成聩单　

——］

Ｊ　

晕＊　匝ｒ＿——］幢ｉ厦ｊｒ］碡ｉ（盐）：　　

如果子句排列次序上写成ｒｅｐｏ　ｆｏｒｍ　ｓｃ—ｇｒｚ￣　ｐｒｅｙ　ｔｏ　ｐｒｉｎ，　

系统将ｌ叶Ｊ错；另外，如果写为ｒｅｐｏ　ｆ（）ｒｍ　一ｇｒｚｃ

ｉ　ｔ（’ｐｒｉｎ　ｐｒｅｙ，　

．

Ｉ牟　ｌ　

・　

■■＃尊　Ｊ　卑　时一　ｌ掌　■‘１　

＾∞　

・艚　

ｌ　

１　Ｅ　ｌⅡ—ｃ　ｍ…～ｉ　５　１　ｌ　Ｌ．　．。　

‘　

按打印机按钮将直接输Ⅲ到打印机；应朋【ＰＲＯＭＦ￣Ｆ　于句将　

会弹　打印设置窗口，如罔ｌ０所示　

：

．＊　

▲　

图７报表设计器中的总成绩单　

３）细节区。细节区是报表的主要部分，即是查询数据的　

输…部分。在此，需要变化的有序号、课程名称、学习时间　

和学习成绩，需逐个与对应字段绑定，如图７所示　

存“报表”一“变赶…”设置变量Ｎｕｍ．指定“在列尾重　

置”和“计数”．如　８所示　

图９应用Ｐｒｅｖｉｅｗ子旬　

图１０应用Ｐｒｏｍｐｔ子句　

打印预览窗口　

４．２．３输出的报表　

如图１１所示　

譬　ｏ１　２０４　名：阵　随熏Ｉ站ｌ莽州　

黄荆　

弹出设置窗口　

盘　靠

序碍　

Ｉ　

２　

鼍挂离蠢　

菱谱　

犀小平蓦抱　

计算辊鹰　稿　

拳日时目　肆＿　靖　

＾　

５　

６　

Ｂ　

搿簪鞍学　

煳　

裔替辩学　

譬　－　

茏辊忧学　

图８报表变量设置、字段绑定　

９　

ｌ１　

Ｉ２　

Ｉ１　

１姑措　

齄蛊佬　

瞢＊鼎精譬　

啦糟健学　

蒸精　

４）组注脚　组注脚　，一般列…的足报表制作卡｝｛关的　

信息，如“制表人”、“制表Ｈ期”等　

注：使川报表设计　导颅先制…表格再进行修改是极好　

的报丧制作　法、　

４．２报表输出　

４＿２．１　ＶＦＰ报表输出命令　

ＲＥＰＯＲＴ　ＦＯＲＭ　ＦｉｌｅＮａｍｅｌ　Ｉ？　

Ｉ４　

Ｉ５　

许杆他譬　

琦糟　

精精协　

Ｉ７　

ｌ＃　

ｌ　

２Ｏ　

光措埠柏　

☆ｔ　＆　

挥■学　

科特Ｉ艺毕　

２１　

勰　

辩基蚪　与文藏幢掌　

菇理学　

村　±Ｉ－置Ｉ艺璇许　

２‘　

拍　

】７　

瑞＃★●　

矗辊　Ｅ譬　

■唯暂毕　

Ｔ－Ｈ　

【ＥＮＶＩＲＯＮＭＥＮＴ１　

【Ｓｃｏｐｅｌ【ＦＯＲ　ＩＥｘｐｒｅｓｓｉｏｎ１】【ＷＨＩＬＥ　ＩＥｘｐｒｅｓｓｉｏｎ２】　

【ＨＥＡＤＩＮＧ　ｃＨｅａｄｉｎｇＴｅｘｔ】　

【ＮＯＣＯＮＳＯＬＥ１　

ＩＮＯＯＰＴＩＭＩＺＥ】　

母圣蜜瞻　

制表人：——　２０１４．Ｏ８．０　

图１１报表设计器输出报表　

（下转第７８页）　

６６　丽２０１画５．０两３

葡ｉ蓟　污与簟　警嚆　与簟　

…………………………………………………………。　

实用第一　智慧密集　

．　．．．。。，　．　。　．．　。。．．　。。　，　．．　。　．　．　

通过基于特征或异常进行入侵行为分析．并按预定的规则做　

响应，阻止指定的行为。　

容灾备份的规模与频度并不是越大越快就越好．在它的建设　

中就要选择一个成本与功能适合的合点，常用的选择是：最　

小的成本、最大的安全备份。　入侵探测设备往往与防火墙配合部署，以连动方式共同　

保护行业专用网络的安全。部署模式如图２所示。　

６结语　

行业专用网络由于其特殊性，在建设之初就必须根据企　

事业行业的组织结构的具体特点，在调研及需求分析的基础　

上进行充分、详实的规划。规划包括：与行业组织结构相匹　

配的网络拓扑规划，行业专用网络的ＩＰ规划，在这两项规划　

完成之后具体网络建设之前．利用网络模拟软件搭建虚拟网　

络，对网络规划进行测试，确保不出现遗漏和失误。　

行业专用网络在规划中还应充分考虑其运行的安全可靠　

性，在规划阶段就要利用动态网络防御的观念．利用防火墙　

与入侵探测联运机制进行行业专用网络的安全体系设计．同　

时还要规划容灾备份与病毒防治。　

参考文献　

【１】张慧香．校冈网规划与建设ｆＤ】．Ｉｊ１东大学，２０１３．　

【２】刘芳字．浅谈校同网络设计与ＶＬＡＮ的配置…．电大理　

Ｔ，２０１１，（０２）：３１－３３．　

图２行业专用网络安防规划图　

５．３病毒防治　

『３孟川杰，禹水琴，Ａｕｔ３】ｈｏｒ．大型校闻网络设计方案【Ｊ］．　

信息与电脑（理论版），２０１０，（０４）：１３７．　

行业专用网络的病毒防治，主要是行业网络内部部署网　

络版的系统漏洞补丁的分发和病毒查杀的病毒防治系统。即　

行业々用网络内部所有终端、服务器设备全部安装病毒防治　

系统，管理人员通过病毒防治系统管理后台规划补丁升级、　

病毒查杀　

５．４容灾备份　

【４】余玲，尚涛Ａｕｔｈｏｒ．校同网建设方案［Ｊ］．甘肃科技，　

２０１０（２２）：２３－２５．　

【５】王迎新．计算机的网络规划设计与实施方案…．信息与　

电脑（理论版），２０１０，（０９）：７７．　

［６】容文迪．计算机网络安全规划与设计…．祖国，２０１３，　

（０４）：９０．　

容灾备份实现行业专用网络中核心数据、系统的高可靠　

备份与恢复，它在行业专用网络的规划中主要考虑：如何在　

网络系统遭到破坏后，以最快的速度恢复网络系统的正常运　

行，尽可能小地减少核心数据的损失。由于数据备份需要占　

用大量的网络资源，系统备份相当于重建另一套系统，所以　

—

【７】韩波．网络安全规划设计对城域网发展的作用…．信息　

通信，２０１３，（０７）：２５５．　

［８吴长虹．城域网网络安全规划设计研究ｆ８】Ｊ１．信息通信，　

２０ｌ２，（０５）：１４６—１４７．　

Ｓｔ—　—　—址—　Ｌ—址．址—　Ｌ—ｌ屯—址．　Ｌ．Ｓ止．　．　Ｌ．Ｓ　．Ｓ　．ＳｌＬ．Ｓ止．址．Ｓ止．Ｓ－Ｌ．Ｓ－Ｌ　ｊ止．址．１ｔ．ｓ　．Ｓ　．址．址．　Ｌ

Ｓ止．Ｓ　．ＳｌＬ．Ｓ屯．　Ｌ—址．址．址

．

．Ｓｌ上．址．‘ｌ上．｛止．址．　．Ｌ．址．址．１屯　

（上接第６６页）　

过表单录入，也可以南其他软件（如Ｅｘｃｅｌ、Ａｃｃｅｓｓ等）将数　

据转换成ＤＢＦ文件　

５结语　

只对查询表单的主要控件及功能进行了介绍。对于成绩　

查询等的应用，作为专业的数据库开发程序，ＶＦＰ可以说是　

较为简便的，开发起来也没有什么难度。使用ＶＦＰ的命令行　

组成Ｐｒｇ文件同然也能实现结果，但是利用表单运行既直观又　

参考文献　

【１】曾华军，何学仪．ＶｉｓｕａｌＦｏｘＰｒｏ专家方案．北京：中国民　

航出版社．１９９７．　

［２１（美）Ｅ．Ｓａｎｄｅｒ，等．Ｖｉｓｕａｌ　ＦｏｘＰｒｏ　３．０实用指南．潘广和，　

实用，而且操作简便。这也是作为面向对象ＶＦＰ的主要特性　

之一　

等，译．北京：机械Ｔ业ｍ版社．１９９６．　

［３】史济民，汤观全．ＶｉｓｕａｌＦｏｘＰｎ）及其应用系统开发．北京：　

清华大学出版社．２０００．　

至于学生信息、成绩信息、课程信息、专业信息．以及　

院系信息等的录入，可以用表单设计向导制作录入界面．通　

＿￣　

＂（　２０

丽１５　０丽３

与