《表单网页》教案

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

《表单网页》教案

【教学目标】

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的相关内容，也可以利用因特网搜索去解开这个奥秘，在学习本册第七章第三节时，我们会为大家解开这个奥秘。

第二篇：《网页制作表单的设计》教学设计

表单的设计网页制作课程

15电商4、5班2课时

一、【教学目标】

学会使用表单中文本域、图片域、单选按钮、复选框、跳转菜单、文本区域等的应用

二、【教学重点与难点】：

重点：文本域、跳转菜单，单选按钮的应用 难点：单选按钮的应用，跳转菜单的制作

三、【教学方法】

讨论法、讲授法、演示法、练习法

五、【教学过程】

一、认识表单

表单的作用：表单就是浏览者可以在网页中填写信息的表格，其作用是接收浏览者填写的信息并将其提交给表单处理程序进行处理。

二、生成表单

1、表单的创建与表单字段的添加

“插入”—“表单”—“选择需要的表单类型”

2、表单向导

“文件”—“新建”—“网页”--“常规”——“表单网页向导”

三、表单内容编辑

1、文本域——账号和密码的输入

3、图片域——制作提交按钮

4、单选按钮——性别选项设计

5、复选框——兴趣爱好设置

6、按钮（“验证有效性按钮” 登录）

7、跳转菜单菜单——密保问题的设置

8、文本区域——留言框的制作

四、学生练习制作表单

制作一个注册信息表单，要求包括下面的内容：会员帐号、您的姓名、您的性别、输入密码、密码确认、密码提示问题、密码提示答案、电子邮件、留言框、收货地址、兴趣爱好、提交按钮、重填按钮

六、【课程小结】

七、【作业】

完成课堂示范案例，校园网站的注册和登录页面设计

第三篇：下载网页教案

下载网页教案

一、学习目标：

(1)学会下载网页的方法。

(2)学会移动文件（文件夹）的方法。

(3)以教师演示讲授、引导启发和学生讨论尝试、自主学习相结合的方式，学会在因特网上下载有用的网页。

(4)通过导入展示的精美网页激发学生学习下载网页的兴趣，并进一步提高学生使用信息技术的能力。

(5)在保存图片的自主探究中，培养学生发现问题并自我解决问题的能力，提升学生的自学能力。

二、教学重点、难点：

1、学会下载网页和移动文件（文件夹）的方法。

2、保存网页后应该有两个文件，复制操作和移动操作的区别。

三、教学过程：

（一）导入

师：同学们，我们先一起来欣赏一些网页吧！这些网页好看吗？同学们一定非常想保留下来吧？好！今天我们就来学习下载网页！（出示课题）

（二）新授

1、下载网页

师：如果我们作为小小老师，向别人介绍中国儿童资源网的时候，能把完整的网页也呈现给大家，那同学们就更容易理解了。回忆一下我们前面学习的下载图片和下载文字的方法，那么能不能把网页完整的下载下来，即使在断开网络时也能看到完整的网页呢？

师停顿，生沉思片刻

生回答上台演示

一生：首先全部选定

一生准备按住鼠标左键全部拖动 有学生插嘴：按Ctrl+A 一生用自己方法选定后，又尝试了Ctrl+A，非常成功，然后复制，打开Word文档，粘贴。

师：非常棒！XX学生用了我们前面下载文字的方法复制了网页中所有的内容，真会学以致用但是，我们小朋友仔细观察一下，用这种方法，有没有把网页中所有内容完整保存下来。

生讨论回答，找出不同之处。师：那么怎么办呢？ 二生：把它添加到收藏夹

师：我们一起回忆一下，在哪儿用过“添加到收藏夹”

生回答

师小结：添加到收藏夹是帮助我们快速访问网站的方法，不是把网页下载到我们计算机里。

三生：文件——另存为

师强调保存类型

师让学生掌声鼓励操作正确的三生。

我们来看看保存好的网页，和前面下载文字的文件有什么不同吗？出现了两个文件，一个是网页文件，一个是同名文件夹。这个文件夹里有些什么文件？（学生可以点击文件夹浏览）

如果这个文件夹不见了，或者网页文件放到了其他文件夹里，又会怎样？（如果有学生发生这样的问题也可以由学生提出）自己尝试一下，然后和小组同学交流或者翻看书本，把你的交流结果告诉大家。

讨论保存网页的要领。

好，下面同学们自己来试一试，查找我们江阴一个景点的网页，然后把网页保存到“我的文档”里。

师生解决操作中遇到的问题。

2、移动文件和文件夹。（打开网页文件夹，用缩略图方式显示图片）这是刚才下载的网页中的图片，很漂亮，老师很喜欢，想把它放入自己的文件夹里，可以怎么办呢？（复制文件）（前面有复制文件（文件夹）的基础）

师让学生独立完成移动文件（文件夹）的操作 四人一小组讨论移动的方法 组内汇报演示

学生的汇报实在精彩，方法多种多样

1、按右键剪切——粘贴

粘贴的方法（1）直接在文件夹上按右键粘贴

（2）打开文件夹后粘贴

2、直接拖动

3、在菜单栏上选择“移动到文件夹”

两人合作探究选定多个文件的方法，教师提示两个功能键Ctrl，Shift 学生汇报

1、不连续的选定Ctrl

2、连续的选定Shift

3、用鼠标框住 误操作带来的意外发现

生：按住Ctrl健选定多个文件，不小心进行了“拖动”操作，复制了多个文件。

师总结： shift：按住shift键，把鼠标指针指向最后一个要选定的文件，然后单击，就可以选定首尾两个文件之间的所有文件。被选中的文件都是以蓝底白字显示。（广播演示）ctrl：选定不连续的文件

学会这几种选定文件的方法，有再多的文件要选定我们都不怕了。下面请同学们将下载的网页文件夹里的图片移动到你的文件夹里。

小结：我们可以用复制或移动的方法把文件放入其他的文件夹里，也可以同样的操作把文件夹复制或移动到其他的文件夹里。

3、比较。

刚才我们用了两种方法把文件放进自己的文件夹里，那到底复制文件和移动文件两种操作有什么不同呢？（学生归纳总结）

三、总结。

通过今天的学习，你有了哪些收获呢？希望同学们在以后的操作中，灵活运用我们今天学到的知识！

第四篇：网页教案

三、DW安装应用

在学网页创建中，有一款非常重要的软件叫ＤＷ软件，它件全称：Ｄreamweaver，被称为网页三剑客之一． ＤＷ软件学习内容： １.ＤＷ软件下载安装

２.创建ＨＴＭＬ文档和ＣＳＳ样式表并将二者关联起来 ３.ＤＷ软件的应用 Ａ.ＨＴＭＬ文档的创建 １.打开ＤＷ软件

２.如果想创建一个ＨＴＭＬ文档，只要点击“新建”下面的ＨＴＭＬ，这个就完成了一个ＨＴＭＬ文档的创建。

３.在当前页面点击“代码”，就可以看到我们新建一个ＨＴＭＬ文档的时候，包括“声明”、“标签”、“根元素”还有标签及里面的和

第五篇：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

（四）小结 【教学后记】