教案：第11章 表单的使用(一)

第一篇：教案：第11章 表单的使用(一)

第11章 表单的使用

（一）授课时间：2004年11月8日 教学形式：讲解与操作 学时数：2学时 教学用具：计算机及相关软件

教学目的与要求：

1、了解表单的概念；

2、掌握创建表单的三种方法（模板、向导、插入表单域）。

教学提纲：

1、表单概述；

2、创建表单；

3、设计表单。

教学重点和难点：

1、重点：创建表单的三种方法。

2、难点：利用向导创建表单。

教学内容：（时间：90分钟）I.考勤点名：（2分钟）

II.复习总结：（时间：3分钟）

上一章主要讲述了网页中字幕、悬停按钮、创建横幅广告及使用Web搜索组件可以让浏览者搜索站点中的全部网页。Office电子表格、Office图表、Office数据透视表的插入。要求学生掌握这些动态效果的创建方法和过程以及Office表格和图表的的插入。如何插入站点计数器,如何插入包含网页、预定网页和预定图片，以及如何创建链接栏、目录的方法。

III.提问：（时间：10分钟）

1、网页动态效果包括哪几个效果？

2、如何插入“Office数据透视表”组件？

3、如何制作预定网页和预定图片？

4、如何创建目录？

IV.新课讲授：(时间：65分钟)11．1 表单概述

表单通常是由一系列标签文本和相关的表单域(如文本框、复选框、单选按钮以及按钮等)等元素组成。站点访问者可以在表单的各个域中输入或选择相关的信息，然后单击“提交表单”按钮。

11．2创建表单

11．2．1 利用模板创建用户注册表单

1.单击“文件”|“新建”|“网页或站点”命令，打开“新建网页或站点”任务窗格。2．单击“新建网页或站点”任务窗格中的“网页模板”超链接，打开“网页模板”对话框。11．2．1 利用模板创建意见反馈表单

1．单击“文件”|“新建”|“网页或站点”命令，然后单击“新建网页或站点”任务窗格中的“网页模板”超链接，打开“网页模板”对话框。11．2．3 使用向导创建表单网页

1．单击“文件”|“新建”|“网页或站点”命令，然后单击“新建网页或站点”任务窗格中的“网页模板”超链接，打开“网页模板”对话框。

2．在“常规”标签中，选择“表单网页向导”图标，然后单击“确定”按钮。5．单击“添加”按钮，出现对话框，其中列出一些典型的问题； 11．2．4 创建空白的表单

单击“插入”|“表单”|“表单”命令，在网页的当前位置生成一个仅含有“提交”和“重置”按钮的表单。刚创建的表单比较小，无法在其中添加表单域。将插入点移到“提交”按钮前，然后按几次回车键，即可加大表单的区域。

11．3 设计表单

11．3．1 创建和使用文本框 创建文本框

设置文本框的属性

11．3．2 创建和使用文本区

创建文本区

设置文本区的属性

在“网页”视图中，右击要更改属性的文本区，从弹出的快捷菜单中选择“表单域属性”命令，打开“文本区属性”对话框。

11.3.3 创建和使用复选框

创建复选框

设置复选框属性 创建可选择式标签 为表单域指定热键

11．3．4 创建和使用选项按钮 创建选项按钮(单选)设置选项按钮的属性

11．3．5 创建和使用下拉框 创建下拉框

向下拉框添加项目

11．3．6 在表单中使用按钮 图片按钮

普通按钮

提交或重置按钮 为普通按钮指定事件 11．3．7 文件上载

文件上载表单是一个文本框加一个“浏览„”按钮，在浏览器端单击“浏览„”按钮即可打开“打开文件”对话框，选择文件后，文件位置以及文件名就显示在文本框中，按下“提交”按钮后，即可把选定的文件提交到Web服务器上去。

课后总结：（时间：5分钟）

本节课主要介绍了表单的概念和表单创建的三种方法，要求学生了解表单的概念，掌握表单创建的三种方法，特别是从空白表单设计表单的方法和过程，重点掌握表单域的类型及设计方法。

学生疑难问题提问与解答：（时间：5分钟）

课后作业：

1、如何利用模板创建表单？

2、如何利用向导创建表单？

3、表单域的类型有哪些？

第二篇：《表单网页》教案

《表单网页》教案

【教学目标】

1．知识与技能

⑴了解表单网页的概念和作用； ⑵掌握表单网页的制作方法。2．过程与方法

通过阅读课本、观看演示回忆、感受表单网页的作用；在递进的操作任务中掌握表单网页制作和美化的方法。3．情感态度与价值观

体验表单网页在网站中的重要作用，激发他们对信息技术的求知欲，形成积极主动地学习和使用信息技术、参与信息活动的态度。

【重点难点】

表单网页的制作方法。

【课时安排】 1课时

【教学准备】

网络教室、多媒体教学软件。【教学过程】

一、新课引入（5分钟）

大家有QQ号或者E-mail邮箱吗？ 在申请QQ和E-mail时，我们要输入一些个人信息？这类采集用户信息的网页都被称为表单网单。（阅读课本P119）

展示一个简单的园艺网站来介绍家乡的盆景艺术，如皋是全国有名的盆景园艺之乡，每天有许多人通过网络了解如皋的盆景艺术，怎样才能知道他们对我们网站的意见或建议呢？（设计一个留言板网页来采集他们的意见。）

二、过程

（一）认识表单网页（8分钟）

表单网页是一种结构化的网页，是网站中提供浏览者发表个人意见、提供反馈信息的互动交流的页面。

：用于接收用户输入的单行文本信息，如姓名、地址等。滚动文本框：可以输入多行信息的文本框，如意见、建议等。

单选按钮：提供两个或多个互斥选项，用户只能选中其中的一项。如：性别。：提供一个或一组选项，用户可选择其中的一个或多个选项。下拉菜单：允许用户从下拉菜单列表中选择其中一项。

按钮：FrontPage 2000中的按钮表单域有三种类型，即“普通”、“提交”和“重置”。“提交”用于表单提交；“重置”用于清除表单所填内容，回到初始状态；“普通”用于执行其它客户的操作。

（二）制作表单网页（15分钟）

表单网页制作方法步骤：依次单击“插入” →“表单”，弹出下级菜单。实践：制作一个“留言”功能的表单网页。

活动1 建立表单（根据提供的效果样张，完善表单网页）提示：

①在“姓名”后插入一个“单行文本框”； ②在“性别”后的各选项前分别插入“单选按钮”；

③在“您的兴趣爱好”后的各个选项前分别插入“复选框”，可以复制； ④在“您的职业”，后插入一个“下拉菜单”。添加“工程师”和“公务员”和“其他”等菜单内容（单击“添加”按钮，添加“工程师”菜单项，重复操作）；

⑤在“您对我们的建议或要求”后插入“滚动文本框”，调整其至合适大小； ⑥修改默认的按钮名称（双击按钮）；

（三）表单网页的美化（5分钟）

活动2 在最后一行表格中插入一个名为“yy.swf”的Flash动画？ 提示：单击“插入”菜单中的“高级”“插件”。

思考：插入一幅GIF动画图片（.gif）和一个FLASH动画（.swf）有何不同？ 活动3 为当前的表单网页添加一个名为“song.mid”的背景音乐。提示：在网页中的任意位置右击鼠标，选择“网页属性”命令（或单击“文件”菜单，选择“属性”命令），在“常规”选项卡中操作？

保存编辑的表单网页并利用平台提交。作品展示：（5分钟）小结：PPT（3分钟）

二、【检测与评价】（4分钟）

1．通常可以使用（）来收集访问者的意见，统计调查访问信息。A.表格 B.框架 C.表单 D.单元格

2.利用表单制作留言板时，若要采集访问者的性别，可以选用的表单字段有（）。

A.复选框 B.单选按钮 C.下拉菜单 D.单行文本框

3.利用表单中的字段，我们可以设计功能强大的交互式在线考试试卷。以下（）字段可以用来采集不定项选择题的答案。

A.单行文本框 B.单选按钮 C.复选框 D.下拉菜单 4．插入FLASH动画时，使用“插入”菜单下的（）命令。A．图片 B.组件 C.表单 D.高级→插件 5．若要为当前网页设置背景音乐或背景图片，应下面的（）属性中进行设置。

A．图片属性 B.网页属性 C.表格属性 D.单元格属性

【课后延伸】

表单网页提交的数据提交到哪儿去了呢？请同学们课后阅读课本P120的相关内容，也可以利用因特网搜索去解开这个奥秘，在学习本册第七章第三节时，我们会为大家解开这个奥秘。

第三篇：教案：第11章 表单的使用(上机操作)

第11章 表单的使用（上机操作）

授课时间：2004年11月11日 教学形式：上机操作 学时数：2学时 教学用具：计算机及相关软件

教学目的与要求：

1、通过学生自主练习，进一步掌握创建表单的三种方法（模板、向导、插入表单域）。掌握验证表单域对象有效性的设置；

2、了解处理表单结果的几种方法；

3、掌握确认网页的创建。

教学提纲：

1、创建表单；

2、设计表单。

3、验证表单域对象有效性；

4、处理表单结果；

5、确认网页。

教学重点和难点：

1、重点：创建表单的三种方法。验证表单域对象有效性、创建确认网页。

2、难点：利用向导创建表单。处理表单结果。

教学内容：（时间：90分钟）I.考勤点名：（2分钟）

II.复习总结：（时间：3分钟）

本章主要介绍了表单的概念和表单创建的三种方法，验证表单域对象有效性、处理表单结果和确认网页等。要求学生了解表单的概念，掌握表单创建的三种方法，特别是从空白表单设计表单的方法和过程，重点掌握表单域的类型及设计方法。掌握验证表单域对象有效性的设置、了解处理表单结果的几种方法、掌握确认网页的创建。

III.提问：（时间：10分钟）

1、有哪些表单域对象需要验证有效性？

2、保存处理表单结果有哪几种方法？

3、什么叫确认网页?如何创建？

IV.新课讲授：(时间：65分钟)11．2创建表单

11．2．1 利用模板创建用户注册表单 11．2．2 利用模板创建意见反馈表单 11．2．3 使用向导创建表单网页 11．2．4 创建空白的表单

11．3 设计表单

11．3．1 创建和使用文本框 创建文本框

设置文本框的属性

11．3．2 创建和使用文本区

创建文本区

设置文本区的属性

11.3.3 创建和使用复选框 创建复选框

设置复选框属性 创建可选择式标签 为表单域指定热键

11．3．4 创建和使用选项按钮 创建选项按钮(单选)设置选项按钮的属性

11．3．5 创建和使用下拉框 创建下拉框 向下拉框添加项目

11．3．6 在表单中使用按钮 图片按钮

普通按钮

提交或重置按钮 为普通按钮指定事件 11．3．7 文件上载

11．4 验证表单域对象有效性

11．4．1 文本框与文本区表单域验证 11．4．2 选项按钮表单域验证 11．4．3 下拉框表单域验证

11．5 处理表单结果

11．5．1 将文件保存表单结果

11．5．2 使用电子邮件保存表单结果 11.5.3用数据库保存表单信息

11．6 确认网页

11．6．1 创建确认网页

11．6．2 使用自定义的确认网页

课后总结：（时间：5分钟）

本节课主要练习表单创建的三种方法，验证表单域对象有效性、处理表单结果和确认网页等。使学生进一步了解表单的概念，掌握表单创建的三种方法，重点掌握表单域的类型及设计方法。掌握验证表单域对象有效性的设置、了解处理表单结果的几种方法、掌握确认网页的创建。

学生疑难问题提问与解答：（时间：5分钟）

课后作业：

（无）

第四篇：VF电子教案(表单练习)

教学时间约

****年**月**日

总第节

审批签字：

【课题】表单练习（1）

本课（章、节）共 2 课时，本课时为第1、2 课时,课的类型：实习课 【教学目标】熟悉表单的操作与命令 【教学重点】表单的操作与命令 【教学难点】表单的操作与命令 【教学方法】讲授法、实验法 【教学过程及板书设计】

（一）前提测评：

（二）目标展示：表单的操作与命令

（三）导学达标：

一、与表无关的表单设计（与计时器无关）1．要求：(1)编制一个按钮组调色板

(2)当用户按了命令按钮组中的某个按钮后，表单的背景色就会变为按钮指定的对应颜色。

 命令按钮组Commandgroup1的Click事件代码：

do case

case this.value=1 thisform.backcolor=rgb(225,0,0)case this.value=2 thisform.backcolor=rgb(0,255,0)case this.value=3 thisform.backcolor=rgb(0,0,255)case this.value=4 thisform.backcolor=rgb(0,0,0)case this.value=5 thisform.backcolor=rgb(225,255,255)endcase thisform.refresh

2．要求：(1)编制一个按钮组调色板

(2)当用户按了命令按钮组中的某个按钮后，命令按钮组的背景色就会变为按钮指定的对应颜色。(注意与上一题比较，14是设置表单的背景色，本题是设置命令按钮组的背景色。

 命令按钮组Commandgroup1的Click事件代码：

do case

case this.value=1 this.backcolor=rgb(225,0,0)case this.value=2 this.backcolor=rgb(0,255,0)case this.value=3 this.backcolor=rgb(0,0,255)case this.value=4 this.backcolor=rgb(0,0,0)case this.value=5 this.backcolor=rgb(225,255,255)endcase thisform.refresh

3．要求：(1)编制一个选项按钮组调色板

(2)当用户按了某个选项按钮后，表单的背景颜色就会变为按钮指定的对应颜色。

 选项按钮组Optiongroup1的Click事件代码：

do case

case this.value=1

thisform.backcolor=rgb(255,0,0)case this.value=2

thisform.backcolor=rgb(0,255,0)case this.value=3 教学时间约

****年**月**日

总第节

审批签字：

thisform.backcolor=rgb(0,0,255)case this.value=4

thisform.backcolor=rgb(0,0,0)case this.value=5

thisform.backcolor=rgb(255,255,255)endcase  如果是设置选项按钮组的背景色，如下图

则颜色设置语句为：thisform.optiongroup1.backcolor=rgb(255,0,0)4．要求：(1)编制一个“选页调色板”表单

(2)当用户按了某页后，页框的背景色就会变成指定的对应颜色。

 选项按钮组Pageframe1的Click事件代码：

do case case this.activepage=1

this.page1.backcolor=rgb(255,0,0)case this.activepage=2

this.page2.backcolor=rgb(0,255,0)case this.activepage=3

this.page3.backcolor=rgb(0,0,255)case this.activepage=4

this.page4.backcolor=rgb(0,0,0)case this.activepage=5

this.page5.backcolor=rgb(255,255,255)endcase thisform.refresh

5.要求：（1）编制一个表单完成口令判定功能；（2）用户从键盘输入口令时，表单的显示控件以“*”代替具体内容；（3）系统的口令存放在表文件“学生.dbf”的姓名字段中，要求完全匹配；（4）输入口令后，按回车，将自动在表单上显示“正确”或“错误”信息。

***text1的Valid事件代码：

loca for alltrim(this.value)=alltrim(姓名)if found()

thisform.label2.caption=”正确！” else

thisform.label2.caption=”错误！” endif select 学生

6．要求：编制一个人工翻动日历牌，界面窗口中显示当前日期，但是可以通过界面提供的微调按钮任意地向前或向后翻动日期。

 Text1的dateformat属性设为“14-汉语”  微调Spinner1的Downclick事件代码：

thisform.text1.value=thisform.text1.value-1 thisform.refresh  微调Spnnier1的Upclick事件代码：

thisform.text1.value=thisform.text1.value+1 thisform.refresh

（四）小结 【教学后记】

教学时间约

****年**月**日

总第节

审批签字：

【课题】表单练习（2）

本课（章、节）共 2 课时，本课时为第1、2 课时,课的类型：实习课 【教学目标】熟悉表单的操作与命令 【教学重点】表单的操作与命令 【教学难点】表单的操作与命令 【教学方法】讲授法、实验法 【教学过程及板书设计】

（一）前提测评：

（二）目标展示：表单的操作与命令

（三）导学达标：

7．要求(1)设计一个表单，接受用户输入的数字，生成相应的矩阵

(2)文本框内输入一个小于等于10的数字，生成一个相应的对称矩阵，且这个矩阵的对角线的数字全部为0，其他的数字为1。

 “显示”按钮Command1的click事件的代码：

n=val(thisform.text1.value)s=“" for i=1 to n

for j=1 to n

if j=i or j+i=n+1

s=s+”0“+space(2)

else

s=s+”1“+space(2)

endif

endfor

s=s+chr(13)&&每N个字符加一个回车键，所以在内循环结束时执行该语句 endfor thisform.edit1.value=s thisform.refresh

8、要求：按“开始”按钮，在编辑框中显示九九乘法口诀表。

**表单form1的init事件代码： public c,m store “” to c,m **“开始”按钮的click事件 m=”*”

for a=1 to 9

m=m+str(a,4)endfor for I=1 to 9

c=c+str(I,1)for j=1 to I

c=c+str(I*j,4)endfor c=c+chr(13)endfor thisfom.edit1.value=m+c thisform.refresh

9、要求：在文本框中输入一个起始数，在编辑框中显示20个从起始位置开始并且是3的倍数的整数，且这20个数字的个位数都是3，利用标签输出这20个数的和。教学时间约

****年**月**日

总第节

审批签字：

***文本框text1的valid事件代码： public s j=1 I=val(alltrim(thisform.text1.value))S=0 Do while j<=20

If I%3=0 and mod(I,10)=3 J=j+1 S=s+I Thisform.edit1.value=thisform.edit1.value+str(I,10)

Endif

I=I+1 Enddo Thisform.refresh

***command1的click事件代码：

thisform.label2.caption=”这组数字的和=”+str(s,10)thisform.refresh

10、要求：（1）在文本框text1中输入任意一个100以内的正整数；（2）将所有300以内的能被该整数整除的数显示在编辑框中；（3）将所在这些数的和显示在text2中；（4）按“清除”按钮时，将文本框及编辑框清空。

**表单form1的init事件代码： thisform.text1.value=0 thisform.text1.setfocus thisform.text2.value=0 ***文本框text1的valid事件代码： for I=1 to 300

if mod(I,thisform.text1.value)=0 thisform.edit1.value=thisform.edit1.value+str(I,5)+chr(13)thisform.text2.value=thisform.text2.value+i

endif endfor ***“清除”按钮的click事件代码： thisform.text1.value=0 thisform.text2.value=0 thisform.edit1.value=”” thisform.text1.setfocus

（四）小结 【教学后记】

教学时间约

****年**月**日

总第节

审批签字：

【课题】表单练习（3）

本课（章、节）共 2 课时，本课时为第1、2 课时,课的类型：实习课 【教学目标】熟悉表单的操作与命令 【教学重点】表单的操作与命令 【教学难点】表单的操作与命令 【教学方法】讲授法、实验法 【教学过程及板书设计】

（一）前提测评：

要求：按“开始”按钮，在编辑框中显示九九乘法口诀表。**表单form1的init事件代码： public c,m store “” to c,m **“开始”按钮的click事件 m=”*” for a=1 to 9

m=m+str(a,4)endfor for I=1 to 9

c=c+str(I,1)for j=1 to I

c=c+str(I*j,4)endfor c=c+chr(13)endfor thisfom.edit1.value=m+c thisform.refresh

（二）目标展示：表单的操作与命令

（三）导学达标：

11、要求：按“开始”按钮，在列表框中显示2000-2100年之间所有的闰年。

**“开始”按钮的click事件代码： thisform.list1.clear for n=2000 to 2100

if n%4=0 if n%100<>0 or n%400=0

y=1 else

y=0 endif else y=0

endif if y=1

thisform.list1.additem(alltrim(str(n)))endif endfor

12．要求：(1)编制一个小型文本编辑器，界面见下图；(2)文字信息从键盘输入至edit框；(3)三个单选按钮分别用于设置“宋体”、“黑体”和“隶书”；(4)三个check按钮用设置字体的“倾斜”、“加粗”和“下划线”；(5)字号用微调控件实现 教学时间约

****年**月**日

总第节

审批签字：

***optiongroup1的click事件代码: do case

case this.value=1 thisform.text1.fontname=”宋体”

case this.value=2 thisform.text1.fontname=”楷体”

case this.value=3

thisform.text1.fontname=”隶书” endcase ***check1的click事件代码: if this.value=1

thisform.text1.fontbold=.t.else

thisform.text1.fontbold=.f.endif ***check2,3的代码类似于check1 ***spinner1的upclick事件代码

thisform.text1.fontsize=thisform.text1.fontsize-1 ***spinner1的downclick事件代码

thisform.text1.fontsize=thisform.text1.fontsize+1 13.要求：(1)在表单中的三个文本框中分别输入3个数，判别是否能形成三角形，如果是三角形，求出此三角形的面积。(2)判断是否是三角形，可利用：a+b>c,且c>0;a+c>b,且b>0;b+c>a,且a>0

***判断计算按钮command1的click事件代码: a=val(thisform.text1.value)b=val(thisform.text2.value)c=val(thisform.text3.value)if(a+b>c and c>0)or(a+c>b and b>0)or(b+c>a and a>0)

s=(a+b+c)/2

area=sqrt(s*(s-a)*(s-b)*(s-c))endif thisform.label2.caption=”能构成三角形,面积等于:” +str(atea)14．建立一个如图所示的表单

 选项按钮组Optiongroup1的Click事件代码：

do case

case this.value=1

create

case this.value=2 create form case this.value=3

modify command endcase

（四）小结 【教学后记】 教学时间约

****年**月**日

总第节

审批签字：

【课题】表单练习（4）

本课（章、节）共 2 课时，本课时为第1、2 课时,课的类型：实习课 【教学目标】熟悉表单的操作与命令 【教学重点】表单的操作与命令 【教学难点】表单的操作与命令 【教学方法】讲授法、实验法 【教学过程及板书设计】

（一）前提测评：

（二）目标展示：表单的操作与命令

（三）导学达标：

二、与表无关的表单设计（计时器类表单设计）

15．要求：编制一个信息显示(时钟)的界面，显示当前时间(每秒动态显示跳动一次)(2)并将表单的背景颜色设置为蓝、绿色自动变换(与时间同步切换)

 Timer1的Timer事件代码：

s=substr(time(),1,2)f=substr(time(),4,2)m=substr(time(),7,2)mn=val(m)if int(mn/2)=mn/2

thisform.backcolor=rgb(0,0,255)else

thisform.backcolor=rgb(0,255,0)

endif thisform.text1.value=time()16．要求：(1)编制一个表单完成数字时钟显示功能(2)表单将自动以1秒为间隔动态显示系统时间(3)时、分、秒要求用汉字说明

 文本框Text1的背景色Backcolor为RGB(255,255,255)；FONTNAME为“隶书”。 时钟控件Timer1的Timer事件代码：

s=substr(time(),1,2)f=substr(time(),4,2)m=substr(time(),7,2)thisform.text1.value=s+”时“+f+'分'+m+'秒'

thisform.refresh 17．要求：(1)编制一个表单完成计时器计数显示功能(2)表单初始显示状态为全零“00：00：00”

(3)按“计数”按钮，将自动以秒为单位从零开始计数(设：时的计数属性名为S，分的计数属性名为F，秒的计数属性名为M。)并在表单上动态显示。按“停止”按钮将显示最后一刻的计数时间。

 创建1个新建属性，clocknum初值设为0  表单的form1的init事件代码：

thisform.timer1.enabled=.f.thisform.text1.value=”00:00:00“ thisform.refresh  “计数”按钮command1的click事件代码： thisform.timer1.enabled=.t. “停止”按钮command2的click事件代码： thisform.timer1.enabled=.f. 时钟控件timer1的timer事件代码：

js=thisform.clocknum s=int(js/3600)f=int(js/60)m=js%60 s1=iif(s<10,'0'+str(s,1),str(s,2))f1=iif(f<10,'0'+str(f,1),str(f,2))

教学时间约

****年**月**日

总第节

审批签字：

m1=iif(m<10,'0'+str(m,1),str(m,2))thisform.text1.value=s1+”:“+f1+”:“+m1 thisform.clocknum=thisform.clocknum+1 thisform.refresh 18．要求：(1)“日期”“星期”“时钟”标签上的文本能自动换行，自动调整大小，背景透明；(2)时钟每1秒种跳一次

 时钟控件Timer1的Timer事件代码：

y=str(year(date()),4)m=str(month(date()),2)d=str(day(date()),2)thisform.text1.value=y+”年“+m+”月“+d+”日“ c=”日一二三四五六“ n=dow(date())w=”星期“+substr(c,2*n-1,2)+”(“+cdow(date())+”)“ thisform.text2.value=w thisform.text3.value=time()19．要求：(1)编制一个表单完成文字水平动态移动操纵的表单；(2)文字信息(纵向)初始显示位置在表单的左边，表单执行后，每间隔20毫秒，文字会自动以间隔加1的幅度逐步向表单右边移动，直到文字到达表单最右边缘；(3)然后，每间隔20毫秒文字会自动以间隔加1的幅度逐步向表单左边移动，直到文字回复到初始位置；(4)整个过程不间断地来回移动

 新建表单属性：right  表单的Form1的Init事件代码：

thisform.timer1.interval=20  时钟控件Timer1的Timer事件代码：

IF thisform.label1.Left=0

thisform.right=.f.endif if thisform.label1.left+thisform.label1.width=thisform.width

thisform.right=.t.ENDIF IF thisform.right

thisform.label1.Left=thisform.label1.Left-1 ELSE

thisform.label1.Left=thisform.label1.Left+1 ENDIF thisform.refresh 20.编制一个日历时钟表单,界面如图所示.要求:(1)表单中的日历是当前日期，时钟每秒跳动一次；(2)单击微调控件的前翻后翻按钮，日期与星期随之变化。

***表单Form1的init事件代码: thisform.text1.value=date()w=iif(dow(date())>1,dow(date())-1,7)thisform.text2.value=”星期”+substr(“一二三四五六日”,2*w-1,2)+”(“+cdow(date())+”)” thisform.text3.value=time()thisform.spinner1.setfocus ***spinner1的upclick事件代码：

thisform.text1.value=thisform.text1.value+1 w=iif(dow(thisform.text1.value)>1,dow(thisform.text1.value)-1,7)thisform.text2.value=”星期”+substr(“一二三四五日”,2*w-1,2)+”(“+cdow(thisform.text1.value)+”)” ***spinner1的downclick事件代码：

thisform.text1.value=thisform.text1.value-1 w=iif(dow(thisform.text1.value)>1,dow(thisform.text1.value)-1,7)thisform.text2.value=”星期”+substr(“一二三四五日”,2*w-1,2)+”(“+cdow(thisform.text1.value)+”)” ***timer1 的timer事件代码：

thisform.text3.value=time()

（四）小结【教学后记】

六

六教学时间约

****年**月**日

总第节

审批签字：

【课题】表单练习（5）

本课（章、节）共 2 课时，本课时为第1、2 课时,课的类型：实习课 【教学目标】熟悉表单的操作与命令 【教学重点】表单的操作与命令 【教学难点】表单的操作与命令 【教学方法】讲授法、实验法 【教学过程及板书设计】

（一）前提测评：

（二）目标展示：表单的操作与命令

（三）导学达标：

21．要求：(1)编制一个表单完成文字动态缩放操纵的表单；(2)文字信息初始的位置在表单的正中央，表单执行后，第间隔20毫秒，文字自动以字号加1的幅度逐步向周边延伸变大，直到文字充满整个表单；(3)然后每间隔20毫秒，文字会自动以字号加1的幅度逐步向中lkd回缩变小，直到文字复原为初始的状态；(4)整个过程不间断地缩放(最小字号为4，最大学号为52)

.****新建表单属性change ****表单的Form1的Init事件代码： thisform.change=0 ****时钟控件Timer1的Timer事件代码： if thisform.label1.fontsize=52

thisform.change=1 endif if thisform.label1.fontsize=4

thisform.change=0 endif if thisform.change=0 thisform.label1.fontsize=thisform.label1.fontsize+1 else

thisform.label1.fontsize=thisform.label1.fontsize-1 endif thisform.refresh

三、与表相关的表单设计（单表）

1．要求：(1)编制一个表单完成表文件“学生.dbf”内容的只读浏览显示功能；(如图1)(2)表单初始显示内容为表文件“学生.dbf”内容的首记录；

(3)表单内容将以10秒为间隔自动刷新，即自动向后翻记录，当翻至表底时，瘵自动回到首记录循环翻动。

 表单的Form1的Init事件代码：

THIS.SETALL(”READONLY“,.T.,”TEXTBOX“)GO TOP THISFORM.REFRESH  时钟控件Timer1的Timer事件代码： SKIP IF EOF()

GO TOP ENDIF THISFORM.REFRESH

2．要求：(1)编制一个表单完成表文件“学生.dbf“内容的只读浏览显示功能(如图2)(2)表单初始显示内容为表文件“学生.dbf”的首记录(3)当按“前翻”、“后翻”、“首记录”、“末记录”按钮时，表单将自动显示相应记录的内容(4)当翻至表头或表底时，将自动设置相应按钮不可访问。教学时间约

****年**月**日

总第节

审批签字：

 表单的Form1的Init事件代码：

THIS.SETALL(”READONLY“,.T.,”TEXTBOX“)Sele 学生 GO TOP THISFORM.REFRESH  “首记录”按钮Command1的Click事件代码：

go top thisform.command2.enabled=.t.thisform.command3.enabled=.t.thisform.command4.enabled=.t.thisform.command1.enabled=.f.thisform.refresh  “前翻”按钮Command2的Click事件代码：

skip-1 if bof()thisform.command1.enabled=.f.this.enabled=.f.endif thisform.command3.enabled=.t.thisform.command4.enabled=.t.thisform.refresh

 “后翻”按钮Command3的Click事件代码：

skip if eof()thisform.command3.enabled=.f.thisform.command4.enabled=.f.endif thisform.command1.enabled=.t.thisform.command2.enabled=.t.thisform.refresh

 “末记录”按钮Command4的Click事件代码： go bottom thisform.command1.enabled=.t.thisform.command2.enabled=.t.thisform.command3.enabled=.t.thisform.command4.enabled=.f.thisform.refresh 3．要求：(1)编制“学生“表信息查询界面

(2)查询与用户指定的学生姓名相匹配的记录，并显示指定学生的所有信息。

  



List1的Rowsourcetype为“6-字段”，Rowsource为“学生.姓名”；文本框Text1~Text5的数据源属性分别为学生表中对应字段 所有文本框Text的ReadOnly属性为“.T.”； 表单的Form1的Init事件代码： use 学生

thisform.setall(”visible“,.f.,”textbox“)thisform.setall(”visible“,.f.,”label“)thisform.label1.visible=.t.thisform.refresh 列表框List1的Interactivechange事件代码： thisform.setall(”visible“,.t.)thisform.refresh

（四）小结 【教学后记】

教学时间约

****年**月**日

总第节

审批签字：

【课题】表单练习（6）

本课（章、节）共 2 课时，本课时为第1、2 课时,课的类型：实习课 【教学目标】熟悉表单的操作与命令 【教学重点】表单的操作与命令 【教学难点】表单的操作与命令 【教学方法】讲授法、实验法 【教学过程及板书设计】

（一）前提测评：

（二）目标展示：表单的操作与命令

（三）导学达标：

4．要求：(1)编制“学生表”信息查询界面(2)显示指定学生的所有信息。

  



Combo1的Rowsourcetype为“6-字段”，Rowsource为“学生.姓名”；文本框Text1~Text5的数据源属性分别为学生表中对应字段 所有文本框Text的ReadOnly属性为“.T.”； 表单的Form1的Init事件代码： use 学生

thisform.setall(”visible“,.f.,”textbox“)thisform.setall(”visible“,.f.,”label“)thisform.label1.visible=.t.thisform.refresh 组合框Combo1的Interactivechange事件代码： thisform.setall(”visible“,.t.)thisform.refresh

5．要求：编制“学生”表信息查询界面，查询与用户输入的学生学号相匹配的记录，并显示指定学生的所有信息。

 Label3、Label4、Label5、Label6的Caption属性分别设置为“姓名：”、“性别：”、“出生年月：”、“奖学金：”，并设置所有文本框的数据源属性为学生表中的对应字段  标签Label2的Forecolor属性为“255,255,255”

 除学号文本框，所有文本框Text的ReadOnly属性为“.T.”；  表单的Form1的Init事件代码：

use 学生

thisform.setall(”visible“,.f.)thisform.label1.visible=.t.thisform.text1.visible=.t. 文本框Text1的Valid事件代码：

loca for alltrim(学号)=alltrim(this.value)if found()

thisform.label2.caption=”“

thisform.setall(”visible“,.t.)else

thisform.setall(”visible“,.f.)

thisform.label1.visible=.t.thisform.text1.visible=.t.thisform.label2.visible=.t.thisform.label2.caption=”您所指定的学生并不存在！“ endif thisform.refresh

6．要求：(1)编制一个界面程序，实现将用户指定的表文件的字段名列表显示(2)系统自动查询用户指定的表文件是否存在，存在则列表显示指定表文件的所有字段名信息，否则给出信息提示框 教学时间约

****年**月**日

总第节

审批签字：

 Form1的Init事件的代码：

Thisform.label2.visible=.f.Thisform.list1.visible=.f. Text1的Valid事件的代码

fn=alltrim(this.value)+ ”.dbf“ if file(fn)thisform.setall(”visible“,.t.)thisform.list1.clear

use(fn)for i=1 to fcount()

thisform.list1.additem(field(i))endfor else Thisform.label2.visible=.f.Thisform.list1.visible=.f.messagebox(”指定的表文件不存在!“,0+64, ”表文件存在判断“)endif thisform.refresh

7.编制一个表单完成学生成绩信息查询显示功能(界面如图所示)。要求(1)当输入学生 9．要求：(1)编制一个表单完成表文件“学生.dbf”内容的查询显示功能(2)当用户在组合框(下拉列表)选择班级(学号的左三位)后，表单将自动显示对应班级的奖学金总额

(3)按“退出”按钮时，自动关闭表单。

 表单Form1的Init事件代码：

sele 学生

index on left(学号,3)to xh unique scan thisform.combo1.additem(left(学号,3))endscan  组合框Combo1的Valid事件代码：

set talk off Sum 奖学金 to jxj for left(学号,3)=this.value Thisform.twxt1.value=jsj  “退出”按钮Command1的Click事件代码：

thisform.release 10．要求：(1)编制一个表单完成表文件“学生.dbf”“成绩.dbf”内容的查询显示功能(2)当用户在组合框(下拉列表)选择班级(学号的左三位)后，表单将自动显示对应班级的所有学生的总平均成绩

(3)按“退出”按钮时，自动关闭表单。

 表单Form1的Init事件代码：

Set talk off index on left(学号,3)to xh unique scan

thisform.combo1.additem(left(学号,3))endscan set index to  组合框combo1的Valid事件代码：

set talk off average成绩 to cj for left(学号,3)=this.value thisform.text1.value=cj  “退出”按钮Command1的Click事件代码： thisform.release

（四）小结 【教学后记】 教学时间约

****年**月**日

总第节

审批签字：

【课题】表单练习（7）

本课（章、节）共 2 课时，本课时为第1、2 课时,课的类型：实习课 【教学目标】熟悉表单的操作与命令 【教学重点】表单的操作与命令 【教学难点】表单的操作与命令 【教学方法】讲授法、实验法 【教学过程及板书设计】

（一）前提测评：

（二）目标展示：表单的操作与命令

（三）导学达标：

11．编制一个表单完成数据转移操作功能

 命令按钮“添加一项”command1的click事件代码：

thisform.list2.additem(thisform.list1.value)thisform.list1.removeitem(thisform.list1.listindex)&&“添加一项”将list1内容移到list2，即list1的内容减少一项（removeitem），list2的内容增加一项（additem）。thisform.refresh  命令按钮“全部添加”command2的click事件代码：

thisform.list1.clear thisform.list2.clear scan thisform.list2.additem(姓名)endscan &&“全部添加”将list1内容全部移到list2，即list1全部清空（clear），list2内容为学生表的“姓名”。thisform.refresh  命令按钮“移去一项”command3的click事件： thisform.list1.additem(thisform.list2.value)thisform.list2.removeitem(thisform.list2.listindex)&&“移去一项”将list2的内容移到list1，list2减少一项（removetiem），list1增加一项（additem）。thisform.refresh  命令按钮“全部移去”command4 的click事件： thisform.list2.clear thisform.list1.clear scan thisform.list1.additem(姓名)endscan &&“全部移去”将list2内容全部移到list1，即list2全部清空（clear），list1内容为学生表的“姓名”。

thisform.refresh

12．要求：(1)编制一个列表框数据转移操作表单；(2)当在左边显示学生姓名的窗口选择某个学生后，单击“选择一项”按钮，左边的列表中的所选中的单项信息将自动转移到右边的列表框中；(3)当在右边显示学生姓名的窗口选择某个学生后，单击“退还一项”按钮，右边的列表中选中的单项信息将自动转移到左边的列表框中。

*****表单Form1的init事件代码: 教学时间约

****年**月**日

总第节

审批签字：

this.list2.rowsourcetype=0 this.list2.rowsource=” this.list12.sorted=.t.this.list1.rowsourcetype=0 this.list1.rowsource=”” use 学生 scan

this.list1.additem(姓名)endscan *****命令按钮”选择一项”command1的click事件代码: thisform.list2.additem(thisform.list1.value)thisform.list1.removeitem(thisform.list1.listindex)thisform.refresh *****命令按钮”退还一项”command2的click事件代码: thisform.list1.additem(thisform.list2.value)thisform.list2.removeitem(thisform.list2.listindex)thisform.refresh

13．要求：在文本框中输入一个工资金额数，从数据表文件gzb.dbf（工资表）中查找高于此工资数男女人数，利用标签输出统计结果。

*****统计按钮command1的click事件代码: select gzb count to x for 工资>val(thisfom.text1.value)and 性别=.t.count to y for 工资>val(thisform.text1.value)and 性别=.f.thisform.label2.caption=”工资超过”+thisform.text1.value+”的男职工人数为:”+str(x,4)thisform.label3.caption=”工资超过”+thisform.text1.value+”的女职工人数为:”+str(y,4)14.四、与表相关的表单设计（多表）

15．要求：(1)编制一个表单完成表文件“课程.dbf”“成绩.dbf”内容的查询显示功能

(2)当用户在组合框选择课程名后，表单将自动显示对应课程的所有学生的总平均成绩

(3)按“退出”按钮时，自动关闭表单。

 组合框Combo1的RowSouceType属性为“6-字段”，RowSouce属性为“课程.课程名”。 组合框Combo1的Valid事件代码：

set talk off select 课程 kch=课程号 select 成绩

average 成绩 to cj for 课程号=kch thisform.text1.value=cj  “退出”按钮Command1的Click事件代码：

thisform.release

（四）小结 【教学后记】

教学时间约

****年**月**日

总第节

审批签字：

【课题】表单练习（8）

本课（章、节）共 2 课时，本课时为第1、2 课时,课的类型：实习课 【教学目标】熟悉表单的操作与命令 【教学重点】表单的操作与命令 【教学难点】表单的操作与命令 【教学方法】讲授法、实验法 【教学过程及板书设计】

（一）前提测评：

（二）目标展示：表单的操作与命令

（三）导学达标：

16．要求：(1)编制一个表单完成表文件“学生.dbf”“成绩.dbf”内容的查询显示功能(2)当用户在组合框(下拉列表)选择姓名后，表单将自动显示对应学生的平均成绩(3)按“退出”按钮时，自动关闭表单。

 组合框Combo1的RowSouceType属性为“6-字段”，RowSouce属性为“学生.姓名”。 组合框Combo1的Interactivepage事件代码：

set talk off select 学生 xh=学号 select 成绩

average 成绩 to cj for 学号=xh thisform.text1.value=cj  “退出”按钮Command1的Click事件代码：

thisform.release

17.要求：(1)编制一个表单完成表文件“学生.dbf”、“成绩.dbf”、“课程.dbf”内容的编辑浏览显示功能

(2)三个表文件分别显示在三个不同的页面上(3)未被激活的页面自动设为不可访问

 Timer1的Interval属性设置为10000  Timer1的Timer事件的代码：

P=Thisform.PageFrame1.ActivePage P=P+1 IF P>3

P=1 ENDIF

Thisform.PageFrame1.SetAll(”Enabled“,.F.,”Page")Thisform.PageFrame1.Pages(P).Enabled=.T.Thisform.PageFrame1.ActivePage=P

18.要求：（1）编制一个学生成绩查询表单，表单中的显示学生信息的窗口的指针移动时，在另一个窗口可以自动显示出对应那个学生所所有成绩信息。

*****Form1的init事件代码: sele 成绩 教学时间约

****年**月**日

总第节

审批签字：

inde on 学号 to xh sele 学生

set rela to 学号into 成绩

19.要求：（1）编制一个表单完成表文件“学生.dbf”“成绩.dbf”“课程.dbf”内容的编辑浏览显示功能；（2）三个表文件分别显示在三个不同的页面上；（3）当在选项按钮组选择某个表文件时，页框中的页会自动翻页，即自动翻动为与选择的表文件对应的页；（4）未被激活的页面自动设为不可访问

*****Form1的init事件代码: thisform.pageframe1.setall(“enabled”..f.,”page”)thisform.pageframe1.page1.enabled=.t.*****Optiongroup1的click事件代码: thisform.pageframe1.setall(“enabled”,.f.,”page”)do case

case this.value=1

thisform.pageframe1.page1.enabled=.t.thisform.pageframe1.activepage1=1 case this.value=2

thisform.pageframe1.page2.enabled=.t.thisform.pageframe1.activepage=2 case this.value=3 thisform.pageframe1.page3.enabled=.t.thisform.pageframe1.activepage=3 endcase 20．要求：(1)编制一个小型文本编辑器，界面见下图；(2)文字信息从键盘输入至edit框；(3)三个单选按钮分别用于设置“宋体”、“黑体”和“隶书”；(4)三个check按钮用设置字体的“倾斜”、“加粗”和“下划线”；(5)字号用微调控件实现

***optiongroup1的click事件代码: do case case this.value=1 thisform.text1.fontname=”宋体” case this.value=2 thisform.text1.fontname=”楷体” case this.value=3 thisform.text1.fontname=”隶书” endcase ***check1的click事件代码: if this.value=1 thisform.text1.fontbold=.t.else thisform.text1.fontbold=.f.endif ***check2,3的代码类似于check1 ***spinner1的upclick事件代码

thisform.text1.fontsize=thisform.text1.fontsize-1 ***spinner1的downclick事件代码

thisform.text1.fontsize=thisform.text1.fontsize+1

（四）小结 【教学后记】

第五篇：行政管理表单

行政管理工作表单

行政费用计划表 行政费用申请单 通讯费用报销单 外勤费用报销单 车辆费用报销单 招待费用报销单 公务联系单 参观许可证 接待用餐申请表 公关工作计划表 会议记录表 会议计划表 会议审核项目表 决议事项确认表 决议事项实施表 会议室使用申请表 印章使用登记表 印章使用审批表 印章使用申请单 印章管理登记表 印章使用范围表 计算机故障维修记录卡 计算机网络报修登记表 计算机网络设备档案表

收文登记表 公文传递单 公文会签单 档案索引表

档案明细表

档案调阅单 信件接收登记表 外发信件登记表 图书借阅卡 借阅登记表 丢失报告单

声像材料送审表 项目提案表 会议提案表

员工提案汇总表 优秀提案审核基准表 提案实施成果评分表 员工提案改善评分表 应聘人员登记表 面试成绩评定表 员工培训申请表 培训实施计划表 培训费用预算表 员工考勤统计表 员工请假申请单 出差计划申请表 差旅费报销清单 差旅费支付明细表 物料移交清册 物资保管清单

物料使用转移登记卡 固定资产登记表 固定资产移交清单 固定资产保管记录卡 办公用品请购单 办公用品一览表 办公用品登记表 办公用品领用表 办公用品盘点单 办公用品耗用统计表 车辆登记表

车辆使用申请单 车辆调度派车单 车辆日常检查表 车辆故障请修单 车辆保养记录表 车辆交通事故处理单 交通事故现场记录表 安全工作日报表 安全检查报告书 安全整改通知书 意外事故报告单 安全事故报告书 保安工作日志 来宾出入登记表 员工外出登记表 物品出厂放行单 货品进厂联络单 值班人员安排表 值班工作记录表 消防器械检查记录表 消防设备检修报告表 伤亡事故报告书 突发事故报告表 赔偿处理调查报告表 员工住宿申请单 员工宿舍登记表 住宿人员资料卡 宿舍物品领用表 宿舍检查登记表

宿舍管理员值班日报表 厨房排班表

餐厅卫生检查表 餐厅卫生考核表 清洁工作安排表 卫生状况检查表 绿化责任区划分表 绿化项目计划表 绿化质量巡查表 员工病假单 员工体检表

工伤医疗费用报销申请表;v