第一篇：《表單網(wǎng)頁(yè)》教案

《表單網(wǎng)頁(yè)》教案

【教學(xué)目標(biāo)】

1．知識(shí)與技能

⑴了解表單網(wǎng)頁(yè)的概念和作用； ⑵掌握表單網(wǎng)頁(yè)的制作方法。2．過(guò)程與方法

通過(guò)閱讀課本、觀看演示回憶、感受表單網(wǎng)頁(yè)的作用；在遞進(jìn)的操作任務(wù)中掌握表單網(wǎng)頁(yè)制作和美化的方法。3．情感態(tài)度與價(jià)值觀

體驗(yàn)表單網(wǎng)頁(yè)在網(wǎng)站中的重要作用，激發(fā)他們對(duì)信息技術(shù)的求知欲，形成積極主動(dòng)地學(xué)習(xí)和使用信息技術(shù)、參與信息活動(dòng)的態(tài)度。

【重點(diǎn)難點(diǎn)】

表單網(wǎng)頁(yè)的制作方法。

【課時(shí)安排】 1課時(shí)

【教學(xué)準(zhǔn)備】

網(wǎng)絡(luò)教室、多媒體教學(xué)軟件。【教學(xué)過(guò)程】

一、新課引入（5分鐘）

大家有QQ號(hào)或者E-mail郵箱嗎？ 在申請(qǐng)QQ和E-mail時(shí)，我們要輸入一些個(gè)人信息？這類采集用戶信息的網(wǎng)頁(yè)都被稱為表單網(wǎng)單。（閱讀課本P119）

展示一個(gè)簡(jiǎn)單的園藝網(wǎng)站來(lái)介紹家鄉(xiāng)的盆景藝術(shù)，如皋是全國(guó)有名的盆景園藝之鄉(xiāng)，每天有許多人通過(guò)網(wǎng)絡(luò)了解如皋的盆景藝術(shù)，怎樣才能知道他們對(duì)我們網(wǎng)站的意見或建議呢？（設(shè)計(jì)一個(gè)留言板網(wǎng)頁(yè)來(lái)采集他們的意見。）

二、過(guò)程

（一）認(rèn)識(shí)表單網(wǎng)頁(yè)（8分鐘）

表單網(wǎng)頁(yè)是一種結(jié)構(gòu)化的網(wǎng)頁(yè)，是網(wǎng)站中提供瀏覽者發(fā)表個(gè)人意見、提供反饋信息的互動(dòng)交流的頁(yè)面。

：用于接收用戶輸入的單行文本信息，如姓名、地址等。滾動(dòng)文本框：可以輸入多行信息的文本框，如意見、建議等。

單選按鈕：提供兩個(gè)或多個(gè)互斥選項(xiàng)，用戶只能選中其中的一項(xiàng)。如：性別。：提供一個(gè)或一組選項(xiàng)，用戶可選擇其中的一個(gè)或多個(gè)選項(xiàng)。下拉菜單：允許用戶從下拉菜單列表中選擇其中一項(xiàng)。

按鈕：FrontPage 2000中的按鈕表單域有三種類型，即“普通”、“提交”和“重置”。“提交”用于表單提交；“重置”用于清除表單所填內(nèi)容，回到初始狀態(tài)；“普通”用于執(zhí)行其它客戶的操作。

（二）制作表單網(wǎng)頁(yè)（15分鐘）

表單網(wǎng)頁(yè)制作方法步驟：依次單擊“插入” →“表單”，彈出下級(jí)菜單。實(shí)踐：制作一個(gè)“留言”功能的表單網(wǎng)頁(yè)。

活動(dòng)1 建立表單（根據(jù)提供的效果樣張，完善表單網(wǎng)頁(yè)）提示：

①在“姓名”后插入一個(gè)“單行文本框”； ②在“性別”后的各選項(xiàng)前分別插入“單選按鈕”；

③在“您的興趣愛好”后的各個(gè)選項(xiàng)前分別插入“復(fù)選框”，可以復(fù)制； ④在“您的職業(yè)”，后插入一個(gè)“下拉菜單”。添加“工程師”和“公務(wù)員”和“其他”等菜單內(nèi)容（單擊“添加”按鈕，添加“工程師”菜單項(xiàng)，重復(fù)操作）；

⑤在“您對(duì)我們的建議或要求”后插入“滾動(dòng)文本框”，調(diào)整其至合適大小； ⑥修改默認(rèn)的按鈕名稱（雙擊按鈕）；

（三）表單網(wǎng)頁(yè)的美化（5分鐘）

活動(dòng)2 在最后一行表格中插入一個(gè)名為“yy.swf”的Flash動(dòng)畫？ 提示：?jiǎn)螕簟安迦搿辈藛沃械摹案呒?jí)”“插件”。

思考：插入一幅GIF動(dòng)畫圖片（.gif）和一個(gè)FLASH動(dòng)畫（.swf）有何不同？ 活動(dòng)3 為當(dāng)前的表單網(wǎng)頁(yè)添加一個(gè)名為“song.mid”的背景音樂(lè)。提示：在網(wǎng)頁(yè)中的任意位置右擊鼠標(biāo)，選擇“網(wǎng)頁(yè)屬性”命令（或單擊“文件”菜單，選擇“屬性”命令），在“常規(guī)”選項(xiàng)卡中操作？

保存編輯的表單網(wǎng)頁(yè)并利用平臺(tái)提交。作品展示：（5分鐘）小結(jié)：PPT（3分鐘）

二、【檢測(cè)與評(píng)價(jià)】（4分鐘）

1．通常可以使用（）來(lái)收集訪問(wèn)者的意見，統(tǒng)計(jì)調(diào)查訪問(wèn)信息。A.表格 B.框架 C.表單 D.單元格

2.利用表單制作留言板時(shí)，若要采集訪問(wèn)者的性別，可以選用的表單字段有（）。

A.復(fù)選框 B.單選按鈕 C.下拉菜單 D.單行文本框

3.利用表單中的字段，我們可以設(shè)計(jì)功能強(qiáng)大的交互式在線考試試卷。以下（）字段可以用來(lái)采集不定項(xiàng)選擇題的答案。

A.單行文本框 B.單選按鈕 C.復(fù)選框 D.下拉菜單 4．插入FLASH動(dòng)畫時(shí)，使用“插入”菜單下的（）命令。A．圖片 B.組件 C.表單 D.高級(jí)→插件 5．若要為當(dāng)前網(wǎng)頁(yè)設(shè)置背景音樂(lè)或背景圖片，應(yīng)下面的（）屬性中進(jìn)行設(shè)置。

A．圖片屬性 B.網(wǎng)頁(yè)屬性 C.表格屬性 D.單元格屬性

【課后延伸】

表單網(wǎng)頁(yè)提交的數(shù)據(jù)提交到哪兒去了呢？請(qǐng)同學(xué)們課后閱讀課本P120的相關(guān)內(nèi)容，也可以利用因特網(wǎng)搜索去解開這個(gè)奧秘，在學(xué)習(xí)本冊(cè)第七章第三節(jié)時(shí)，我們會(huì)為大家解開這個(gè)奧秘。

第二篇：《網(wǎng)頁(yè)制作表單的設(shè)計(jì)》教學(xué)設(shè)計(jì)

表單的設(shè)計(jì)網(wǎng)頁(yè)制作課程

15電商4、5班2課時(shí)

一、【教學(xué)目標(biāo)】

學(xué)會(huì)使用表單中文本域、圖片域、單選按鈕、復(fù)選框、跳轉(zhuǎn)菜單、文本區(qū)域等的應(yīng)用

二、【教學(xué)重點(diǎn)與難點(diǎn)】：

重點(diǎn)：文本域、跳轉(zhuǎn)菜單，單選按鈕的應(yīng)用 難點(diǎn)：?jiǎn)芜x按鈕的應(yīng)用，跳轉(zhuǎn)菜單的制作

三、【教學(xué)方法】

討論法、講授法、演示法、練習(xí)法

五、【教學(xué)過(guò)程】

一、認(rèn)識(shí)表單

表單的作用：表單就是瀏覽者可以在網(wǎng)頁(yè)中填寫信息的表格，其作用是接收瀏覽者填寫的信息并將其提交給表單處理程序進(jìn)行處理。

二、生成表單

1、表單的創(chuàng)建與表單字段的添加

“插入”—“表單”—“選擇需要的表單類型”

2、表單向?qū)?/p>

“文件”—“新建”—“網(wǎng)頁(yè)”--“常規(guī)”——“表單網(wǎng)頁(yè)向?qū)А?/p>

三、表單內(nèi)容編輯

1、文本域——賬號(hào)和密碼的輸入

3、圖片域——制作提交按鈕

4、單選按鈕——性別選項(xiàng)設(shè)計(jì)

5、復(fù)選框——興趣愛好設(shè)置

6、按鈕（“驗(yàn)證有效性按鈕” 登錄）

7、跳轉(zhuǎn)菜單菜單——密保問(wèn)題的設(shè)置

8、文本區(qū)域——留言框的制作

四、學(xué)生練習(xí)制作表單

制作一個(gè)注冊(cè)信息表單，要求包括下面的內(nèi)容：會(huì)員帳號(hào)、您的姓名、您的性別、輸入密碼、密碼確認(rèn)、密碼提示問(wèn)題、密碼提示答案、電子郵件、留言框、收貨地址、興趣愛好、提交按鈕、重填按鈕

六、【課程小結(jié)】

七、【作業(yè)】

完成課堂示范案例，校園網(wǎng)站的注冊(cè)和登錄頁(yè)面設(shè)計(jì)

第三篇：下載網(wǎng)頁(yè)教案

下載網(wǎng)頁(yè)教案

一、學(xué)習(xí)目標(biāo)：

(1)學(xué)會(huì)下載網(wǎng)頁(yè)的方法。

(2)學(xué)會(huì)移動(dòng)文件（文件夾）的方法。

(3)以教師演示講授、引導(dǎo)啟發(fā)和學(xué)生討論嘗試、自主學(xué)習(xí)相結(jié)合的方式，學(xué)會(huì)在因特網(wǎng)上下載有用的網(wǎng)頁(yè)。

(4)通過(guò)導(dǎo)入展示的精美網(wǎng)頁(yè)激發(fā)學(xué)生學(xué)習(xí)下載網(wǎng)頁(yè)的興趣，并進(jìn)一步提高學(xué)生使用信息技術(shù)的能力。

(5)在保存圖片的自主探究中，培養(yǎng)學(xué)生發(fā)現(xiàn)問(wèn)題并自我解決問(wèn)題的能力，提升學(xué)生的自學(xué)能力。

二、教學(xué)重點(diǎn)、難點(diǎn)：

1、學(xué)會(huì)下載網(wǎng)頁(yè)和移動(dòng)文件（文件夾）的方法。

2、保存網(wǎng)頁(yè)后應(yīng)該有兩個(gè)文件，復(fù)制操作和移動(dòng)操作的區(qū)別。

三、教學(xué)過(guò)程：

（一）導(dǎo)入

師：同學(xué)們，我們先一起來(lái)欣賞一些網(wǎng)頁(yè)吧！這些網(wǎng)頁(yè)好看嗎？同學(xué)們一定非常想保留下來(lái)吧？好！今天我們就來(lái)學(xué)習(xí)下載網(wǎng)頁(yè)！（出示課題）

（二）新授

1、下載網(wǎng)頁(yè)

師：如果我們作為小小老師，向別人介紹中國(guó)兒童資源網(wǎng)的時(shí)候，能把完整的網(wǎng)頁(yè)也呈現(xiàn)給大家，那同學(xué)們就更容易理解了。回憶一下我們前面學(xué)習(xí)的下載圖片和下載文字的方法，那么能不能把網(wǎng)頁(yè)完整的下載下來(lái)，即使在斷開網(wǎng)絡(luò)時(shí)也能看到完整的網(wǎng)頁(yè)呢？

師停頓，生沉思片刻

生回答上臺(tái)演示

一生：首先全部選定

一生準(zhǔn)備按住鼠標(biāo)左鍵全部拖動(dòng) 有學(xué)生插嘴：按Ctrl+A 一生用自己方法選定后，又嘗試了Ctrl+A，非常成功，然后復(fù)制，打開Word文檔，粘貼。

師：非常棒！XX學(xué)生用了我們前面下載文字的方法復(fù)制了網(wǎng)頁(yè)中所有的內(nèi)容，真會(huì)學(xué)以致用但是，我們小朋友仔細(xì)觀察一下，用這種方法，有沒有把網(wǎng)頁(yè)中所有內(nèi)容完整保存下來(lái)。

生討論回答，找出不同之處。師：那么怎么辦呢？ 二生：把它添加到收藏夾

師：我們一起回憶一下，在哪兒用過(guò)“添加到收藏夾”

生回答

師小結(jié)：添加到收藏夾是幫助我們快速訪問(wèn)網(wǎng)站的方法，不是把網(wǎng)頁(yè)下載到我們計(jì)算機(jī)里。

三生：文件——另存為

師強(qiáng)調(diào)保存類型

師讓學(xué)生掌聲鼓勵(lì)操作正確的三生。

我們來(lái)看看保存好的網(wǎng)頁(yè)，和前面下載文字的文件有什么不同嗎？出現(xiàn)了兩個(gè)文件，一個(gè)是網(wǎng)頁(yè)文件，一個(gè)是同名文件夾。這個(gè)文件夾里有些什么文件？（學(xué)生可以點(diǎn)擊文件夾瀏覽）

如果這個(gè)文件夾不見了，或者網(wǎng)頁(yè)文件放到了其他文件夾里，又會(huì)怎樣？（如果有學(xué)生發(fā)生這樣的問(wèn)題也可以由學(xué)生提出）自己嘗試一下，然后和小組同學(xué)交流或者翻看書本，把你的交流結(jié)果告訴大家。

討論保存網(wǎng)頁(yè)的要領(lǐng)。

好，下面同學(xué)們自己來(lái)試一試，查找我們江陰一個(gè)景點(diǎn)的網(wǎng)頁(yè)，然后把網(wǎng)頁(yè)保存到“我的文檔”里。

師生解決操作中遇到的問(wèn)題。

2、移動(dòng)文件和文件夾。（打開網(wǎng)頁(yè)文件夾，用縮略圖方式顯示圖片）這是剛才下載的網(wǎng)頁(yè)中的圖片，很漂亮，老師很喜歡，想把它放入自己的文件夾里，可以怎么辦呢？（復(fù)制文件）（前面有復(fù)制文件（文件夾）的基礎(chǔ)）

師讓學(xué)生獨(dú)立完成移動(dòng)文件（文件夾）的操作 四人一小組討論移動(dòng)的方法 組內(nèi)匯報(bào)演示

學(xué)生的匯報(bào)實(shí)在精彩，方法多種多樣

1、按右鍵剪切——粘貼

粘貼的方法（1）直接在文件夾上按右鍵粘貼

（2）打開文件夾后粘貼

2、直接拖動(dòng)

3、在菜單欄上選擇“移動(dòng)到文件夾”

兩人合作探究選定多個(gè)文件的方法，教師提示兩個(gè)功能鍵Ctrl，Shift 學(xué)生匯報(bào)

1、不連續(xù)的選定Ctrl

2、連續(xù)的選定Shift

3、用鼠標(biāo)框住 誤操作帶來(lái)的意外發(fā)現(xiàn)

生：按住Ctrl健選定多個(gè)文件，不小心進(jìn)行了“拖動(dòng)”操作，復(fù)制了多個(gè)文件。

師總結(jié)： shift：按住shift鍵，把鼠標(biāo)指針指向最后一個(gè)要選定的文件，然后單擊，就可以選定首尾兩個(gè)文件之間的所有文件。被選中的文件都是以藍(lán)底白字顯示。（廣播演示）ctrl：選定不連續(xù)的文件

學(xué)會(huì)這幾種選定文件的方法，有再多的文件要選定我們都不怕了。下面請(qǐng)同學(xué)們將下載的網(wǎng)頁(yè)文件夾里的圖片移動(dòng)到你的文件夾里。

小結(jié)：我們可以用復(fù)制或移動(dòng)的方法把文件放入其他的文件夾里，也可以同樣的操作把文件夾復(fù)制或移動(dòng)到其他的文件夾里。

3、比較。

剛才我們用了兩種方法把文件放進(jìn)自己的文件夾里，那到底復(fù)制文件和移動(dòng)文件兩種操作有什么不同呢？（學(xué)生歸納總結(jié)）

三、總結(jié)。

通過(guò)今天的學(xué)習(xí)，你有了哪些收獲呢？希望同學(xué)們?cè)谝院蟮牟僮髦校`活運(yùn)用我們今天學(xué)到的知識(shí)！

第四篇：網(wǎng)頁(yè)教案

三、DW安裝應(yīng)用

在學(xué)網(wǎng)頁(yè)創(chuàng)建中，有一款非常重要的軟件叫ＤＷ軟件，它件全稱：Ｄreamweaver，被稱為網(wǎng)頁(yè)三劍客之一． ＤＷ軟件學(xué)習(xí)內(nèi)容： １.ＤＷ軟件下載安裝

２.創(chuàng)建ＨＴＭＬ文檔和ＣＳＳ樣式表并將二者關(guān)聯(lián)起來(lái) ３.ＤＷ軟件的應(yīng)用 Ａ.ＨＴＭＬ文檔的創(chuàng)建 １.打開ＤＷ軟件

２.如果想創(chuàng)建一個(gè)ＨＴＭＬ文檔，只要點(diǎn)擊“新建”下面的ＨＴＭＬ，這個(gè)就完成了一個(gè)ＨＴＭＬ文檔的創(chuàng)建。

３.在當(dāng)前頁(yè)面點(diǎn)擊“代碼”，就可以看到我們新建一個(gè)ＨＴＭＬ文檔的時(shí)候，包括“聲明”、“標(biāo)簽”、“根元素”還有標(biāo)簽及里面的和

第五篇：VF電子教案(表單練習(xí))

教學(xué)時(shí)間約

****年**月**日

總第節(jié)

審批簽字：

【課題】表單練習(xí)（1）

本課（章、節(jié)）共 2 課時(shí)，本課時(shí)為第1、2 課時(shí),課的類型：實(shí)習(xí)課 【教學(xué)目標(biāo)】熟悉表單的操作與命令 【教學(xué)重點(diǎn)】表單的操作與命令 【教學(xué)難點(diǎn)】表單的操作與命令 【教學(xué)方法】講授法、實(shí)驗(yàn)法 【教學(xué)過(guò)程及板書設(shè)計(jì)】

（一）前提測(cè)評(píng)：

（二）目標(biāo)展示：表單的操作與命令

（三）導(dǎo)學(xué)達(dá)標(biāo)：

一、與表無(wú)關(guān)的表單設(shè)計(jì)（與計(jì)時(shí)器無(wú)關(guān)）1．要求：(1)編制一個(gè)按鈕組調(diào)色板

(2)當(dāng)用戶按了命令按鈕組中的某個(gè)按鈕后，表單的背景色就會(huì)變?yōu)榘粹o指定的對(duì)應(yīng)顏色。

? 命令按鈕組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)編制一個(gè)按鈕組調(diào)色板

(2)當(dāng)用戶按了命令按鈕組中的某個(gè)按鈕后，命令按鈕組的背景色就會(huì)變?yōu)榘粹o指定的對(duì)應(yīng)顏色。(注意與上一題比較，14是設(shè)置表單的背景色，本題是設(shè)置命令按鈕組的背景色。

? 命令按鈕組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)編制一個(gè)選項(xiàng)按鈕組調(diào)色板

(2)當(dāng)用戶按了某個(gè)選項(xiàng)按鈕后，表單的背景顏色就會(huì)變?yōu)榘粹o指定的對(duì)應(yīng)顏色。

? 選項(xiàng)按鈕組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 教學(xué)時(shí)間約

****年**月**日

總第節(jié)

審批簽字：

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 ? 如果是設(shè)置選項(xiàng)按鈕組的背景色，如下圖

則顏色設(shè)置語(yǔ)句為：thisform.optiongroup1.backcolor=rgb(255,0,0)4．要求：(1)編制一個(gè)“選頁(yè)調(diào)色板”表單

(2)當(dāng)用戶按了某頁(yè)后，頁(yè)框的背景色就會(huì)變成指定的對(duì)應(yīng)顏色。

? 選項(xiàng)按鈕組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）編制一個(gè)表單完成口令判定功能；（2）用戶從鍵盤輸入口令時(shí)，表單的顯示控件以“*”代替具體內(nèi)容；（3）系統(tǒng)的口令存放在表文件“學(xué)生.dbf”的姓名字段中，要求完全匹配；（4）輸入口令后，按回車，將自動(dòng)在表單上顯示“正確”或“錯(cuò)誤”信息。

***text1的Valid事件代碼：

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

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

thisform.label2.caption=”錯(cuò)誤！” endif select 學(xué)生

6．要求：編制一個(gè)人工翻動(dòng)日歷牌，界面窗口中顯示當(dāng)前日期，但是可以通過(guò)界面提供的微調(diào)按鈕任意地向前或向后翻動(dòng)日期。

? Text1的dateformat屬性設(shè)為“14-漢語(yǔ)” ? 微調(diào)Spinner1的Downclick事件代碼：

thisform.text1.value=thisform.text1.value-1 thisform.refresh ? 微調(diào)Spnnier1的Upclick事件代碼：

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

（四）小結(jié) 【教學(xué)后記】

教學(xué)時(shí)間約

****年**月**日

總第節(jié)

審批簽字：

【課題】表單練習(xí)（2）

本課（章、節(jié)）共 2 課時(shí)，本課時(shí)為第1、2 課時(shí),課的類型：實(shí)習(xí)課 【教學(xué)目標(biāo)】熟悉表單的操作與命令 【教學(xué)重點(diǎn)】表單的操作與命令 【教學(xué)難點(diǎn)】表單的操作與命令 【教學(xué)方法】講授法、實(shí)驗(yàn)法 【教學(xué)過(guò)程及板書設(shè)計(jì)】

（一）前提測(cè)評(píng)：

（二）目標(biāo)展示：表單的操作與命令

（三）導(dǎo)學(xué)達(dá)標(biāo)：

7．要求(1)設(shè)計(jì)一個(gè)表單，接受用戶輸入的數(shù)字，生成相應(yīng)的矩陣

(2)文本框內(nèi)輸入一個(gè)小于等于10的數(shù)字，生成一個(gè)相應(yīng)的對(duì)稱矩陣，且這個(gè)矩陣的對(duì)角線的數(shù)字全部為0，其他的數(shù)字為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個(gè)字符加一個(gè)回車鍵，所以在內(nèi)循環(huán)結(jié)束時(shí)執(zhí)行該語(yǔ)句 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、要求：在文本框中輸入一個(gè)起始數(shù)，在編輯框中顯示20個(gè)從起始位置開始并且是3的倍數(shù)的整數(shù)，且這20個(gè)數(shù)字的個(gè)位數(shù)都是3，利用標(biāo)簽輸出這20個(gè)數(shù)的和。教學(xué)時(shí)間約

****年**月**日

總第節(jié)

審批簽字：

***文本框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=”這組數(shù)字的和=”+str(s,10)thisform.refresh

10、要求：（1）在文本框text1中輸入任意一個(gè)100以內(nèi)的正整數(shù)；（2）將所有300以內(nèi)的能被該整數(shù)整除的數(shù)顯示在編輯框中；（3）將所在這些數(shù)的和顯示在text2中；（4）按“清除”按鈕時(shí)，將文本框及編輯框清空。

**表單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

（四）小結(jié) 【教學(xué)后記】

教學(xué)時(shí)間約

****年**月**日

總第節(jié)

審批簽字：

【課題】表單練習(xí)（3）

本課（章、節(jié)）共 2 課時(shí)，本課時(shí)為第1、2 課時(shí),課的類型：實(shí)習(xí)課 【教學(xué)目標(biāo)】熟悉表單的操作與命令 【教學(xué)重點(diǎn)】表單的操作與命令 【教學(xué)難點(diǎn)】表單的操作與命令 【教學(xué)方法】講授法、實(shí)驗(yàn)法 【教學(xué)過(guò)程及板書設(shè)計(jì)】

（一）前提測(cè)評(píng)：

要求：按“開始”按鈕，在編輯框中顯示九九乘法口訣表。**表單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

（二）目標(biāo)展示：表單的操作與命令

（三）導(dǎo)學(xué)達(dá)標(biāo)：

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)編制一個(gè)小型文本編輯器，界面見下圖；(2)文字信息從鍵盤輸入至edit框；(3)三個(gè)單選按鈕分別用于設(shè)置“宋體”、“黑體”和“隸書”；(4)三個(gè)check按鈕用設(shè)置字體的“傾斜”、“加粗”和“下劃線”；(5)字號(hào)用微調(diào)控件實(shí)現(xiàn) 教學(xué)時(shí)間約

****年**月**日

總第節(jié)

審批簽字：

***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)在表單中的三個(gè)文本框中分別輸入3個(gè)數(shù)，判別是否能形成三角形，如果是三角形，求出此三角形的面積。(2)判斷是否是三角形，可利用：a+b>c,且c>0;a+c>b,且b>0;b+c>a,且a>0

***判斷計(jì)算按鈕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=”能構(gòu)成三角形,面積等于:” +str(atea)14．建立一個(gè)如圖所示的表單

? 選項(xiàng)按鈕組Optiongroup1的Click事件代碼：

do case

case this.value=1

create

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

modify command endcase

（四）小結(jié) 【教學(xué)后記】 教學(xué)時(shí)間約

****年**月**日

總第節(jié)

審批簽字：

【課題】表單練習(xí)（4）

本課（章、節(jié)）共 2 課時(shí)，本課時(shí)為第1、2 課時(shí),課的類型：實(shí)習(xí)課 【教學(xué)目標(biāo)】熟悉表單的操作與命令 【教學(xué)重點(diǎn)】表單的操作與命令 【教學(xué)難點(diǎn)】表單的操作與命令 【教學(xué)方法】講授法、實(shí)驗(yàn)法 【教學(xué)過(guò)程及板書設(shè)計(jì)】

（一）前提測(cè)評(píng)：

（二）目標(biāo)展示：表單的操作與命令

（三）導(dǎo)學(xué)達(dá)標(biāo)：

二、與表無(wú)關(guān)的表單設(shè)計(jì)（計(jì)時(shí)器類表單設(shè)計(jì)）

15．要求：編制一個(gè)信息顯示(時(shí)鐘)的界面，顯示當(dāng)前時(shí)間(每秒動(dòng)態(tài)顯示跳動(dòng)一次)(2)并將表單的背景顏色設(shè)置為藍(lán)、綠色自動(dòng)變換(與時(shí)間同步切換)

? 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)編制一個(gè)表單完成數(shù)字時(shí)鐘顯示功能(2)表單將自動(dòng)以1秒為間隔動(dòng)態(tài)顯示系統(tǒng)時(shí)間(3)時(shí)、分、秒要求用漢字說(shuō)明

? 文本框Text1的背景色Backcolor為RGB(255,255,255)；FONTNAME為“隸書”。? 時(shí)鐘控件Timer1的Timer事件代碼：

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

thisform.refresh 17．要求：(1)編制一個(gè)表單完成計(jì)時(shí)器計(jì)數(shù)顯示功能(2)表單初始顯示狀態(tài)為全零“00：00：00”

(3)按“計(jì)數(shù)”按鈕，將自動(dòng)以秒為單位從零開始計(jì)數(shù)(設(shè)：時(shí)的計(jì)數(shù)屬性名為S，分的計(jì)數(shù)屬性名為F，秒的計(jì)數(shù)屬性名為M。)并在表單上動(dòng)態(tài)顯示。按“停止”按鈕將顯示最后一刻的計(jì)數(shù)時(shí)間。

? 創(chuàng)建1個(gè)新建屬性，clocknum初值設(shè)為0 ? 表單的form1的init事件代碼：

thisform.timer1.enabled=.f.thisform.text1.value=”00:00:00“ thisform.refresh ? “計(jì)數(shù)”按鈕command1的click事件代碼： thisform.timer1.enabled=.t.? “停止”按鈕command2的click事件代碼： thisform.timer1.enabled=.f.? 時(shí)鐘控件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))

教學(xué)時(shí)間約

****年**月**日

總第節(jié)

審批簽字：

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)“日期”“星期”“時(shí)鐘”標(biāo)簽上的文本能自動(dòng)換行，自動(dòng)調(diào)整大小，背景透明；(2)時(shí)鐘每1秒種跳一次

? 時(shí)鐘控件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)編制一個(gè)表單完成文字水平動(dòng)態(tài)移動(dòng)操縱的表單；(2)文字信息(縱向)初始顯示位置在表單的左邊，表單執(zhí)行后，每間隔20毫秒，文字會(huì)自動(dòng)以間隔加1的幅度逐步向表單右邊移動(dòng)，直到文字到達(dá)表單最右邊緣；(3)然后，每間隔20毫秒文字會(huì)自動(dòng)以間隔加1的幅度逐步向表單左邊移動(dòng)，直到文字回復(fù)到初始位置；(4)整個(gè)過(guò)程不間斷地來(lái)回移動(dòng)

? 新建表單屬性：right ? 表單的Form1的Init事件代碼：

thisform.timer1.interval=20 ? 時(shí)鐘控件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.編制一個(gè)日歷時(shí)鐘表單,界面如圖所示.要求:(1)表單中的日歷是當(dāng)前日期，時(shí)鐘每秒跳動(dòng)一次；(2)單擊微調(diào)控件的前翻后翻按鈕，日期與星期隨之變化。

***表單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()

（四）小結(jié)【教學(xué)后記】

六

六教學(xué)時(shí)間約

****年**月**日

總第節(jié)

審批簽字：

【課題】表單練習(xí)（5）

本課（章、節(jié)）共 2 課時(shí)，本課時(shí)為第1、2 課時(shí),課的類型：實(shí)習(xí)課 【教學(xué)目標(biāo)】熟悉表單的操作與命令 【教學(xué)重點(diǎn)】表單的操作與命令 【教學(xué)難點(diǎn)】表單的操作與命令 【教學(xué)方法】講授法、實(shí)驗(yàn)法 【教學(xué)過(guò)程及板書設(shè)計(jì)】

（一）前提測(cè)評(píng)：

（二）目標(biāo)展示：表單的操作與命令

（三）導(dǎo)學(xué)達(dá)標(biāo)：

21．要求：(1)編制一個(gè)表單完成文字動(dòng)態(tài)縮放操縱的表單；(2)文字信息初始的位置在表單的正中央，表單執(zhí)行后，第間隔20毫秒，文字自動(dòng)以字號(hào)加1的幅度逐步向周邊延伸變大，直到文字充滿整個(gè)表單；(3)然后每間隔20毫秒，文字會(huì)自動(dòng)以字號(hào)加1的幅度逐步向中l(wèi)kd回縮變小，直到文字復(fù)原為初始的狀態(tài)；(4)整個(gè)過(guò)程不間斷地縮放(最小字號(hào)為4，最大學(xué)號(hào)為52)

.****新建表單屬性change ****表單的Form1的Init事件代碼： thisform.change=0 ****時(shí)鐘控件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

三、與表相關(guān)的表單設(shè)計(jì)（單表）

1．要求：(1)編制一個(gè)表單完成表文件“學(xué)生.dbf”內(nèi)容的只讀瀏覽顯示功能；(如圖1)(2)表單初始顯示內(nèi)容為表文件“學(xué)生.dbf”內(nèi)容的首記錄；

(3)表單內(nèi)容將以10秒為間隔自動(dòng)刷新，即自動(dòng)向后翻記錄，當(dāng)翻至表底時(shí)，瘵自動(dòng)回到首記錄循環(huán)翻動(dòng)。

? 表單的Form1的Init事件代碼：

THIS.SETALL(”READONLY“,.T.,”TEXTBOX“)GO TOP THISFORM.REFRESH ? 時(shí)鐘控件Timer1的Timer事件代碼： SKIP IF EOF()

GO TOP ENDIF THISFORM.REFRESH

2．要求：(1)編制一個(gè)表單完成表文件“學(xué)生.dbf“內(nèi)容的只讀瀏覽顯示功能(如圖2)(2)表單初始顯示內(nèi)容為表文件“學(xué)生.dbf”的首記錄(3)當(dāng)按“前翻”、“后翻”、“首記錄”、“末記錄”按鈕時(shí)，表單將自動(dòng)顯示相應(yīng)記錄的內(nèi)容(4)當(dāng)翻至表頭或表底時(shí)，將自動(dòng)設(shè)置相應(yīng)按鈕不可訪問(wèn)。教學(xué)時(shí)間約

****年**月**日

總第節(jié)

審批簽字：

? 表單的Form1的Init事件代碼：

THIS.SETALL(”READONLY“,.T.,”TEXTBOX“)Sele 學(xué)生 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)編制“學(xué)生“表信息查詢界面

(2)查詢與用戶指定的學(xué)生姓名相匹配的記錄，并顯示指定學(xué)生的所有信息。

? ? ?

?

List1的Rowsourcetype為“6-字段”，Rowsource為“學(xué)生.姓名”；文本框Text1~Text5的數(shù)據(jù)源屬性分別為學(xué)生表中對(duì)應(yīng)字段 所有文本框Text的ReadOnly屬性為“.T.”； 表單的Form1的Init事件代碼： use 學(xué)生

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

（四）小結(jié) 【教學(xué)后記】

教學(xué)時(shí)間約

****年**月**日

總第節(jié)

審批簽字：

【課題】表單練習(xí)（6）

本課（章、節(jié)）共 2 課時(shí)，本課時(shí)為第1、2 課時(shí),課的類型：實(shí)習(xí)課 【教學(xué)目標(biāo)】熟悉表單的操作與命令 【教學(xué)重點(diǎn)】表單的操作與命令 【教學(xué)難點(diǎn)】表單的操作與命令 【教學(xué)方法】講授法、實(shí)驗(yàn)法 【教學(xué)過(guò)程及板書設(shè)計(jì)】

（一）前提測(cè)評(píng)：

（二）目標(biāo)展示：表單的操作與命令

（三）導(dǎo)學(xué)達(dá)標(biāo)：

4．要求：(1)編制“學(xué)生表”信息查詢界面(2)顯示指定學(xué)生的所有信息。

? ? ?

?

Combo1的Rowsourcetype為“6-字段”，Rowsource為“學(xué)生.姓名”；文本框Text1~Text5的數(shù)據(jù)源屬性分別為學(xué)生表中對(duì)應(yīng)字段 所有文本框Text的ReadOnly屬性為“.T.”； 表單的Form1的Init事件代碼： use 學(xué)生

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．要求：編制“學(xué)生”表信息查詢界面，查詢與用戶輸入的學(xué)生學(xué)號(hào)相匹配的記錄，并顯示指定學(xué)生的所有信息。

? Label3、Label4、Label5、Label6的Caption屬性分別設(shè)置為“姓名：”、“性別：”、“出生年月：”、“獎(jiǎng)學(xué)金：”，并設(shè)置所有文本框的數(shù)據(jù)源屬性為學(xué)生表中的對(duì)應(yīng)字段 ? 標(biāo)簽Label2的Forecolor屬性為“255,255,255”

? 除學(xué)號(hào)文本框，所有文本框Text的ReadOnly屬性為“.T.”； ? 表單的Form1的Init事件代碼：

use 學(xué)生

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

loca for alltrim(學(xué)號(hào))=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=”您所指定的學(xué)生并不存在！“ endif thisform.refresh

6．要求：(1)編制一個(gè)界面程序，實(shí)現(xiàn)將用戶指定的表文件的字段名列表顯示(2)系統(tǒng)自動(dòng)查詢用戶指定的表文件是否存在，存在則列表顯示指定表文件的所有字段名信息，否則給出信息提示框 教學(xué)時(shí)間約

****年**月**日

總第節(jié)

審批簽字：

? 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.編制一個(gè)表單完成學(xué)生成績(jī)信息查詢顯示功能(界面如圖所示)。要求(1)當(dāng)輸入學(xué)生 9．要求：(1)編制一個(gè)表單完成表文件“學(xué)生.dbf”內(nèi)容的查詢顯示功能(2)當(dāng)用戶在組合框(下拉列表)選擇班級(jí)(學(xué)號(hào)的左三位)后，表單將自動(dòng)顯示對(duì)應(yīng)班級(jí)的獎(jiǎng)學(xué)金總額

(3)按“退出”按鈕時(shí)，自動(dòng)關(guān)閉表單。

? 表單Form1的Init事件代碼：

sele 學(xué)生

index on left(學(xué)號(hào),3)to xh unique scan thisform.combo1.additem(left(學(xué)號(hào),3))endscan ? 組合框Combo1的Valid事件代碼：

set talk off Sum 獎(jiǎng)學(xué)金 to jxj for left(學(xué)號(hào),3)=this.value Thisform.twxt1.value=jsj ? “退出”按鈕Command1的Click事件代碼：

thisform.release 10．要求：(1)編制一個(gè)表單完成表文件“學(xué)生.dbf”“成績(jī).dbf”內(nèi)容的查詢顯示功能(2)當(dāng)用戶在組合框(下拉列表)選擇班級(jí)(學(xué)號(hào)的左三位)后，表單將自動(dòng)顯示對(duì)應(yīng)班級(jí)的所有學(xué)生的總平均成績(jī)

(3)按“退出”按鈕時(shí)，自動(dòng)關(guān)閉表單。

? 表單Form1的Init事件代碼：

Set talk off index on left(學(xué)號(hào),3)to xh unique scan

thisform.combo1.additem(left(學(xué)號(hào),3))endscan set index to ? 組合框combo1的Valid事件代碼：

set talk off average成績(jī) to cj for left(學(xué)號(hào),3)=this.value thisform.text1.value=cj ? “退出”按鈕Command1的Click事件代碼： thisform.release

（四）小結(jié) 【教學(xué)后記】 教學(xué)時(shí)間約

****年**月**日

總第節(jié)

審批簽字：

【課題】表單練習(xí)（7）

本課（章、節(jié)）共 2 課時(shí)，本課時(shí)為第1、2 課時(shí),課的類型：實(shí)習(xí)課 【教學(xué)目標(biāo)】熟悉表單的操作與命令 【教學(xué)重點(diǎn)】表單的操作與命令 【教學(xué)難點(diǎn)】表單的操作與命令 【教學(xué)方法】講授法、實(shí)驗(yàn)法 【教學(xué)過(guò)程及板書設(shè)計(jì)】

（一）前提測(cè)評(píng)：

（二）目標(biāo)展示：表單的操作與命令

（三）導(dǎo)學(xué)達(dá)標(biāo)：

11．編制一個(gè)表單完成數(shù)據(jù)轉(zhuǎn)移操作功能

? 命令按鈕“添加一項(xiàng)”command1的click事件代碼：

thisform.list2.additem(thisform.list1.value)thisform.list1.removeitem(thisform.list1.listindex)&&“添加一項(xiàng)”將list1內(nèi)容移到list2，即list1的內(nèi)容減少一項(xiàng)（removeitem），list2的內(nèi)容增加一項(xiàng)（additem）。thisform.refresh ? 命令按鈕“全部添加”command2的click事件代碼：

thisform.list1.clear thisform.list2.clear scan thisform.list2.additem(姓名)endscan &&“全部添加”將list1內(nèi)容全部移到list2，即list1全部清空（clear），list2內(nèi)容為學(xué)生表的“姓名”。thisform.refresh ? 命令按鈕“移去一項(xiàng)”command3的click事件： thisform.list1.additem(thisform.list2.value)thisform.list2.removeitem(thisform.list2.listindex)&&“移去一項(xiàng)”將list2的內(nèi)容移到list1，list2減少一項(xiàng)（removetiem），list1增加一項(xiàng)（additem）。thisform.refresh ? 命令按鈕“全部移去”command4 的click事件： thisform.list2.clear thisform.list1.clear scan thisform.list1.additem(姓名)endscan &&“全部移去”將list2內(nèi)容全部移到list1，即list2全部清空（clear），list1內(nèi)容為學(xué)生表的“姓名”。

thisform.refresh

12．要求：(1)編制一個(gè)列表框數(shù)據(jù)轉(zhuǎn)移操作表單；(2)當(dāng)在左邊顯示學(xué)生姓名的窗口選擇某個(gè)學(xué)生后，單擊“選擇一項(xiàng)”按鈕，左邊的列表中的所選中的單項(xiàng)信息將自動(dòng)轉(zhuǎn)移到右邊的列表框中；(3)當(dāng)在右邊顯示學(xué)生姓名的窗口選擇某個(gè)學(xué)生后，單擊“退還一項(xiàng)”按鈕，右邊的列表中選中的單項(xiàng)信息將自動(dòng)轉(zhuǎn)移到左邊的列表框中。

*****表單Form1的init事件代碼: 教學(xué)時(shí)間約

****年**月**日

總第節(jié)

審批簽字：

this.list2.rowsourcetype=0 this.list2.rowsource=” this.list12.sorted=.t.this.list1.rowsourcetype=0 this.list1.rowsource=”” use 學(xué)生 scan

this.list1.additem(姓名)endscan *****命令按鈕”選擇一項(xiàng)”command1的click事件代碼: thisform.list2.additem(thisform.list1.value)thisform.list1.removeitem(thisform.list1.listindex)thisform.refresh *****命令按鈕”退還一項(xiàng)”command2的click事件代碼: thisform.list1.additem(thisform.list2.value)thisform.list2.removeitem(thisform.list2.listindex)thisform.refresh

13．要求：在文本框中輸入一個(gè)工資金額數(shù)，從數(shù)據(jù)表文件gzb.dbf（工資表）中查找高于此工資數(shù)男女人數(shù)，利用標(biāo)簽輸出統(tǒng)計(jì)結(jié)果。

*****統(tǒng)計(jì)按鈕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=”工資超過(guò)”+thisform.text1.value+”的男職工人數(shù)為:”+str(x,4)thisform.label3.caption=”工資超過(guò)”+thisform.text1.value+”的女職工人數(shù)為:”+str(y,4)14.四、與表相關(guān)的表單設(shè)計(jì)（多表）

15．要求：(1)編制一個(gè)表單完成表文件“課程.dbf”“成績(jī).dbf”內(nèi)容的查詢顯示功能

(2)當(dāng)用戶在組合框選擇課程名后，表單將自動(dòng)顯示對(duì)應(yīng)課程的所有學(xué)生的總平均成績(jī)

(3)按“退出”按鈕時(shí)，自動(dòng)關(guān)閉表單。

? 組合框Combo1的RowSouceType屬性為“6-字段”，RowSouce屬性為“課程.課程名”。? 組合框Combo1的Valid事件代碼：

set talk off select 課程 kch=課程號(hào) select 成績(jī)

average 成績(jī) to cj for 課程號(hào)=kch thisform.text1.value=cj ? “退出”按鈕Command1的Click事件代碼：

thisform.release

（四）小結(jié) 【教學(xué)后記】

教學(xué)時(shí)間約

****年**月**日

總第節(jié)

審批簽字：

【課題】表單練習(xí)（8）

本課（章、節(jié)）共 2 課時(shí)，本課時(shí)為第1、2 課時(shí),課的類型：實(shí)習(xí)課 【教學(xué)目標(biāo)】熟悉表單的操作與命令 【教學(xué)重點(diǎn)】表單的操作與命令 【教學(xué)難點(diǎn)】表單的操作與命令 【教學(xué)方法】講授法、實(shí)驗(yàn)法 【教學(xué)過(guò)程及板書設(shè)計(jì)】

（一）前提測(cè)評(píng)：

（二）目標(biāo)展示：表單的操作與命令

（三）導(dǎo)學(xué)達(dá)標(biāo)：

16．要求：(1)編制一個(gè)表單完成表文件“學(xué)生.dbf”“成績(jī).dbf”內(nèi)容的查詢顯示功能(2)當(dāng)用戶在組合框(下拉列表)選擇姓名后，表單將自動(dòng)顯示對(duì)應(yīng)學(xué)生的平均成績(jī)(3)按“退出”按鈕時(shí)，自動(dòng)關(guān)閉表單。

? 組合框Combo1的RowSouceType屬性為“6-字段”，RowSouce屬性為“學(xué)生.姓名”。? 組合框Combo1的Interactivepage事件代碼：

set talk off select 學(xué)生 xh=學(xué)號(hào) select 成績(jī)

average 成績(jī) to cj for 學(xué)號(hào)=xh thisform.text1.value=cj ? “退出”按鈕Command1的Click事件代碼：

thisform.release

17.要求：(1)編制一個(gè)表單完成表文件“學(xué)生.dbf”、“成績(jī).dbf”、“課程.dbf”內(nèi)容的編輯瀏覽顯示功能

(2)三個(gè)表文件分別顯示在三個(gè)不同的頁(yè)面上(3)未被激活的頁(yè)面自動(dòng)設(shè)為不可訪問(wèn)

? Timer1的Interval屬性設(shè)置為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）編制一個(gè)學(xué)生成績(jī)查詢表單，表單中的顯示學(xué)生信息的窗口的指針移動(dòng)時(shí)，在另一個(gè)窗口可以自動(dòng)顯示出對(duì)應(yīng)那個(gè)學(xué)生所所有成績(jī)信息。

*****Form1的init事件代碼: sele 成績(jī) 教學(xué)時(shí)間約

****年**月**日

總第節(jié)

審批簽字：

inde on 學(xué)號(hào) to xh sele 學(xué)生

set rela to 學(xué)號(hào)into 成績(jī)

19.要求：（1）編制一個(gè)表單完成表文件“學(xué)生.dbf”“成績(jī).dbf”“課程.dbf”內(nèi)容的編輯瀏覽顯示功能；（2）三個(gè)表文件分別顯示在三個(gè)不同的頁(yè)面上；（3）當(dāng)在選項(xiàng)按鈕組選擇某個(gè)表文件時(shí)，頁(yè)框中的頁(yè)會(huì)自動(dòng)翻頁(yè)，即自動(dòng)翻動(dòng)為與選擇的表文件對(duì)應(yīng)的頁(yè)；（4）未被激活的頁(yè)面自動(dòng)設(shè)為不可訪問(wèn)

*****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)編制一個(gè)小型文本編輯器，界面見下圖；(2)文字信息從鍵盤輸入至edit框；(3)三個(gè)單選按鈕分別用于設(shè)置“宋體”、“黑體”和“隸書”；(4)三個(gè)check按鈕用設(shè)置字體的“傾斜”、“加粗”和“下劃線”；(5)字號(hào)用微調(diào)控件實(shí)現(xiàn)

***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

（四）小結(jié) 【教學(xué)后記】