中職學(xué)校VB教案

.實(shí)用文檔.?VisualBasic6.0?教案授課班級(jí)：10級(jí)計(jì)算機(jī)及應(yīng)用1班授課教師：

學(xué)校教學(xué)設(shè)計(jì)表課次第1次2課時(shí)課型周次第6周授課日期年月日課題界面設(shè)計(jì)——時(shí)鐘封面教學(xué)目標(biāo)知識(shí)目標(biāo)熟悉VB6的集成開發(fā)環(huán)境；認(rèn)識(shí)VB6的構(gòu)成要素；技能目標(biāo)了解對(duì)象屬性的設(shè)置與應(yīng)用；素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)激發(fā)學(xué)生學(xué)習(xí)興趣，培養(yǎng)學(xué)生的獨(dú)立思考能力和判斷能力。重點(diǎn)難點(diǎn)簡(jiǎn)單的菜單和工具欄的使用；對(duì)象、對(duì)象屬性的概念；教學(xué)方法設(shè)計(jì)講授法、討論法教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入：VisualBasic是一種可視化、面向?qū)ο蠛筒捎檬录?qū)動(dòng)方式的結(jié)構(gòu)化高級(jí)程序設(shè)計(jì)語言，能用于Windows環(huán)境下的各種應(yīng)用軟件的開發(fā)，是目前較為流行的應(yīng)用軟件開發(fā)平臺(tái)。一、VisualBasic構(gòu)成要素1、對(duì)象與屬性對(duì)象：現(xiàn)實(shí)生活中的對(duì)象就是人們所說的“東西〞，如：太陽系、太陽、月亮。VisualBasic中的對(duì)象有：窗體、標(biāo)簽、命令按鈕等。屬性：描述對(duì)象的特征的數(shù)據(jù)，如標(biāo)簽的Caption、Height、Width等。VisualBasic中對(duì)象屬性使用方法：對(duì)象.屬性=表達(dá)式如：Form1.Caption="第一個(gè)程序"2、事件與過程事件：在VisualBasic中事先設(shè)置好的能被系統(tǒng)識(shí)別的動(dòng)作。例如：用鼠標(biāo)單擊窗體的事件就是Click事件。事件過程：就是事件發(fā)生后，程序要去執(zhí)行的代碼。例如，用鼠標(biāo)單擊窗體觸發(fā)Click事件，程序?qū)?zhí)行過程PrivateSubForm_Click()中的代碼，該過程稱為事件過稱。下面就是一個(gè)事件過程，如果用鼠標(biāo)單擊Command1按鈕就會(huì)觸發(fā)Command1的Click事件，程序要執(zhí)行如下的事件過程。PrivateSubCommand_Click()Text1.Text="VisualBasic程序設(shè)計(jì)"EndSub3、方法：VisualBasic將內(nèi)含的函數(shù)或者過程稱為方法。如下是Form的方法：Form1.Print"Hello,VisualBasic6.0"教學(xué)活動(dòng)1：認(rèn)識(shí)VB的集成開發(fā)環(huán)境。學(xué)生通過看書、討論，說出VB集成開發(fā)環(huán)境包含哪些局部，各局部的作用是什么？教學(xué)活動(dòng)2：演示程序——窗體顏色變化學(xué)生通過觀看演示，小組討論分析用VB開發(fā)應(yīng)用程序需要的步驟。歸納得出步驟為：1.創(chuàng)立應(yīng)用程序界面；2.設(shè)置屬性；3編寫代碼。教學(xué)資源作業(yè)內(nèi)容如何設(shè)置對(duì)象的屬性？教學(xué)后記備注課次第2次2課時(shí)課型周次第7周授課日期年月日課題界面設(shè)計(jì)——時(shí)鐘封面教學(xué)目標(biāo)知識(shí)目標(biāo)標(biāo)簽的常用屬性；技能目標(biāo)了解標(biāo)簽對(duì)象屬性的設(shè)置及應(yīng)用；學(xué)會(huì)保存程序；素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)激發(fā)學(xué)生學(xué)習(xí)興趣，培養(yǎng)學(xué)生的團(tuán)隊(duì)協(xié)作能力和判斷能力。重點(diǎn)難點(diǎn)標(biāo)簽的常用屬性；屬性的設(shè)置方法；教學(xué)方法設(shè)計(jì)工程教學(xué)法、討論法、上機(jī)操作教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入：對(duì)于Windows環(huán)境下的應(yīng)用軟件，一個(gè)漂亮而醒目的封面總會(huì)使軟件充滿魅力。比方Word2003簡(jiǎn)潔美觀的封面，它給所有office的用戶都留下了深刻的印象。教學(xué)活動(dòng)1完成工程：時(shí)鐘封面工程描述：學(xué)習(xí)制作一款應(yīng)用軟件的“封面〞〔見書第2頁〕，它是啟動(dòng)應(yīng)用軟件時(shí)，顯示出的第一個(gè)界面，在該界面上一般顯示軟件名稱、版本、版權(quán)等信息。學(xué)生對(duì)該工程進(jìn)行分析，并實(shí)現(xiàn)。教師根據(jù)學(xué)生完成情況進(jìn)行點(diǎn)評(píng)。相關(guān)知識(shí)介紹：標(biāo)簽：標(biāo)簽用于設(shè)計(jì)在用戶界面上不能被使用者修改的只讀的文字內(nèi)容。標(biāo)簽的常用屬性有：Alignment:標(biāo)簽的文字的對(duì)齊方式，0表示左邊對(duì)齊，1表示右邊對(duì)齊，2表示中間對(duì)齊；AutoSize：可自動(dòng)調(diào)節(jié)標(biāo)簽的大小。值為True時(shí)，標(biāo)簽的大小自動(dòng)與文字的大小一致，值為False時(shí)標(biāo)簽的大小固定，不會(huì)隨文字的大小的改變而改變；BackStyle：標(biāo)簽的背景是否透明。0表示透明，1表示背景不透明；Caption：標(biāo)簽上顯示的文字。標(biāo)簽的事件使用較少。主要事件有：Click事件：?jiǎn)螕魳?biāo)簽觸發(fā)Click事件。工程分析：軟件界面上顯示文本信息一般使用標(biāo)簽〔Label〕，本工程通過3個(gè)標(biāo)簽分別顯示軟件名稱、版本和版權(quán)信息，而背景圖片、圖標(biāo)和標(biāo)題的“歡送〞文本通過設(shè)置窗體屬性實(shí)現(xiàn)。所用控件：窗體、標(biāo)簽。所用屬性：Caption、Font、Aligment、Picture、BackStyle、Icon工程實(shí)現(xiàn)步驟：?jiǎn)?dòng)VB6添加文字修飾文字對(duì)齊文字設(shè)置顯示文字的內(nèi)部名稱添加其余文字對(duì)齊3個(gè)標(biāo)簽設(shè)置窗體背景圖片設(shè)置文字透明背景10、改變窗體大小11、窗體的圖標(biāo)的更改12、窗體的名稱和標(biāo)題欄文字的設(shè)置13、運(yùn)行程序14、保存程序15、生成可執(zhí)行程序16、關(guān)閉VB6教學(xué)資源作業(yè)內(nèi)容標(biāo)簽的常用屬性及意義教學(xué)后記備注課次第3次2課時(shí)課型周次第7周授課日期年月日課題界面設(shè)計(jì)——關(guān)于時(shí)鐘教學(xué)目標(biāo)知識(shí)目標(biāo)圖片框控件的常用屬性；窗體的常用屬性；技能目標(biāo)掌握設(shè)置窗體控件的方法；素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)激發(fā)學(xué)生學(xué)習(xí)興趣，培養(yǎng)學(xué)生的自學(xué)能力、信息分析、理解問題能力。重點(diǎn)難點(diǎn)窗體的常用屬性及設(shè)置；教學(xué)方法設(shè)計(jì)工程教學(xué)法、討論法、上機(jī)操作教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入：在具有Windows風(fēng)格的應(yīng)用軟件中，菜單欄的最后一個(gè)菜單一般是“幫助〞菜單，其中都有一個(gè)“關(guān)于〞菜單命令。如WindowsXP操作系統(tǒng)中，“我的電腦〞的幫助菜單中有一個(gè)“關(guān)于Windows〞菜單命令。教學(xué)活動(dòng)1完成工程：關(guān)于時(shí)鐘工程描述：“關(guān)于〞是英文“About〞的漢譯?！瓣P(guān)于〞窗口與軟件封面的區(qū)別是：軟件封面是應(yīng)用軟件啟動(dòng)時(shí)出現(xiàn)，一般在應(yīng)用軟件主窗口啟動(dòng)后自動(dòng)關(guān)閉；“關(guān)于〞窗口是用于應(yīng)用軟件運(yùn)行之后向用戶提供軟件版本、授權(quán)等信息，一般需要用戶單擊“關(guān)閉〞按鈕才能關(guān)閉窗口。學(xué)生對(duì)該工程進(jìn)行分析，并實(shí)現(xiàn)。教師根據(jù)學(xué)生完成情況進(jìn)行點(diǎn)評(píng)。工程分析：本工程是對(duì)前一工程“時(shí)鐘封面〞主要的區(qū)別是：增加了一個(gè)“關(guān)閉〞按鈕和圖片框，其次是增加了直線、標(biāo)簽及窗口標(biāo)題欄的變化。工程實(shí)現(xiàn)：添加圖片；2、添加文字；3、添加線條；4、添加按鈕；5、添加代碼；6、設(shè)置窗體；7、運(yùn)行程序；8、保存程序教學(xué)資源作業(yè)內(nèi)容窗體的常用屬性有哪些？教學(xué)后記備注課次第4次2課時(shí)課型周次第7周授課日期年月日課題界面設(shè)計(jì)——用戶登錄教學(xué)目標(biāo)知識(shí)目標(biāo)1、命令按鈕、文本框的常用屬性及事件；技能目標(biāo)掌握命令按鈕、文本框控件的初步應(yīng)用；素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)激發(fā)學(xué)生學(xué)習(xí)VB的熱情；培養(yǎng)學(xué)生的自學(xué)能力，分析、理解問題能力。重點(diǎn)難點(diǎn)命令按鈕、文本框的常用屬性；命令按鈕、文本框的應(yīng)用；教學(xué)方法設(shè)計(jì)工程教學(xué)法、討論法、上機(jī)操作教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入：為了管理用戶個(gè)人信息，保護(hù)個(gè)人數(shù)據(jù)的平安，很多應(yīng)用軟件都要求用戶提交賬號(hào)和密碼，這就需要一個(gè)用戶登錄的界面，比方QQ用戶登錄界面。教學(xué)活動(dòng)1工程：制作一款“用戶登錄〞的窗口；工程描述：本工程要求用戶輸入賬號(hào)和密碼〔輸入時(shí)密碼顯示為“*〞〕，單擊“登錄〞按鈕時(shí)，顯示用戶輸入的信息〔顯示時(shí)用戶密碼以明碼顯示〕學(xué)生討論，并說出設(shè)計(jì)步驟。教師點(diǎn)評(píng)，并進(jìn)行分析演示：本工程用文本框接受用戶輸入的數(shù)據(jù)，“重填〞按鈕和“登錄〞按鈕通過代碼設(shè)置是否響應(yīng)用戶的操作〔即可用性〕，窗口上部使用圖像控件顯示圖像文件。知識(shí)點(diǎn)介紹：文本框文本框主要用于在程序中改變顯示的文字，文本框一般具有復(fù)制、剪切、刪除、粘貼等編輯功能。文本框的常見屬性有：Text：文本框中的文字；Multiline:值為True時(shí)，文本框可以多行顯示，值為False時(shí)，文本框的文字以單行顯示；PasswordChar:用于設(shè)置口令，如把文本框的PasswordChar屬性設(shè)置為“*〞,那么在文本框中的任何字符都會(huì)顯示為“*〞，這樣便于口令的保密。文本框的常見事件：Change:文本框的Text發(fā)生改變觸發(fā)該事件；命令按鈕命令按鈕是VisualBasic中使用最頻繁的控件之一，它的常用屬性有：Name：窗體的名稱屬性；Caption:命令按鈕的標(biāo)題屬性；Cancel:該屬性的值有True和False，設(shè)置為true是，按“ESC〞鍵就等價(jià)于點(diǎn)擊該按鈕；Enabled:按鈕是否有效，值為True時(shí)，表示按鈕有效，值為False時(shí)表示該按鈕無效；Style:按鈕的樣式。0表示標(biāo)準(zhǔn)樣式，1表示圖形樣式；Visible:值為True時(shí)按鈕顯示，值為False時(shí)按鈕在運(yùn)行時(shí)不顯示。最常見的事件有：Click事件：用鼠標(biāo)單擊按鈕觸發(fā)該事件。程序舉例：在窗體中按照順序添加Lable1、Text1、Label2、Text2、Command1和Command2，界面如圖1-1所示。圖1-1程序界面設(shè)置屬性，設(shè)置Lable1的Caption為“&User〞、Lable2的Caption為“&Password〞、Command1的Caption為“確定[&E]〞、設(shè)置Command2的Caption為“[&S]〞、設(shè)置Text1和Text2的Text為空，設(shè)置Text2的Passwordchar為“*〞。設(shè)置屬性后的界面如圖1-2所示。圖1-2設(shè)置屬性后的界面教學(xué)資源作業(yè)內(nèi)容教學(xué)后記備注課次第5次2課時(shí)課型周次第8周授課日期年月日課題界面設(shè)計(jì)——用戶登錄教學(xué)目標(biāo)知識(shí)目標(biāo)1、命令按鈕、文本框的常用屬性及事件；2、認(rèn)識(shí)代碼窗口技能目標(biāo)學(xué)會(huì)代碼的添加；素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)激發(fā)學(xué)生學(xué)習(xí)VB的熱情；培養(yǎng)學(xué)生的自學(xué)能力，分析、理解問題能力。重點(diǎn)難點(diǎn)代碼的添加；教學(xué)方法設(shè)計(jì)工程教學(xué)法、討論法、上機(jī)操作教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入：上節(jié)課通過設(shè)計(jì)“用戶登錄〞窗口，相信對(duì)于該程序的界面設(shè)計(jì)有了一定的了解，本節(jié)課希望大家通過閱讀教材，將代碼添加進(jìn)去，實(shí)現(xiàn)完整的程序。理解代碼含義，并說明代碼所完成的功能。回憶程序：在窗體中按照順序添加Lable1、Text1、Label2、Text2、Command1和Command2，界面如圖1-1所示。圖1-1程序界面設(shè)置屬性，設(shè)置Lable1的Caption為“&User〞、Lable2的Caption為“&Password〞、Command1的Caption為“確定[&E]〞、設(shè)置Command2的Caption為“[&S]〞、設(shè)置Text1和Text2的Text為空，設(shè)置Text2的Passwordchar為“*〞。設(shè)置屬性后的界面如圖1-2所示。圖1-2設(shè)置屬性后的界面代碼實(shí)現(xiàn)：編寫代碼如下：PrivateSubCommand1_Click()IfText1.Text="zs"AndText2.Text="123"ThenMsgBox"歡送你"ElseMsgBox"非法用戶"EndIfEndSubPrivateSubCommand2_Click()Text1.Text=""Text2.Text=""EndSub保存程序。運(yùn)行程序，程序正確。學(xué)生交流討論，并自己獨(dú)立實(shí)現(xiàn)“用戶登錄〞窗口的制作。教學(xué)資源作業(yè)內(nèi)容制作一款“用戶登錄〞的窗口教學(xué)后記備注課次第6次2課時(shí)課型周次第8周授課日期年月日課題界面設(shè)計(jì)——時(shí)鐘教學(xué)目標(biāo)知識(shí)目標(biāo)1、日期和時(shí)間函數(shù)；2、語法的概念；技能目標(biāo)初步掌握賦值語句及函數(shù)的用法；學(xué)會(huì)定時(shí)器、圖形控件的初步應(yīng)用；素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)培養(yǎng)學(xué)生協(xié)作精神、分析問題、解決問題能力。重點(diǎn)難點(diǎn)函數(shù)的用法教學(xué)方法設(shè)計(jì)工程教學(xué)法、討論法、上機(jī)操作教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入：時(shí)鐘不僅是一個(gè)顯示時(shí)間的工具，對(duì)很多人來說，時(shí)鐘更是管理時(shí)間的工具，所以，很多應(yīng)用軟件中都附帶有時(shí)鐘工具軟件，如Windows操作系統(tǒng)中自帶的“日期與時(shí)間〞工具里，就有一個(gè)簡(jiǎn)單的時(shí)鐘。教學(xué)活動(dòng)1工程描述：要求制作一款“時(shí)鐘〞軟件。完成的時(shí)鐘以圖形動(dòng)畫和字符兩種形式顯示日期與時(shí)間。在后續(xù)章節(jié)中，可以對(duì)本工程的時(shí)鐘做進(jìn)一步的功能開發(fā)，如顯示星期、定時(shí)鬧鐘等。學(xué)生對(duì)該工程進(jìn)行分析，并實(shí)現(xiàn)。教師根據(jù)學(xué)生完成情況進(jìn)行點(diǎn)評(píng)。工程分析：本工程使用圖形控件畫時(shí)鐘的鐘面，用直線控件畫時(shí)針、分針、秒針的指針，通過定時(shí)器的作用控制秒針、分針和時(shí)針的變化，日期和時(shí)間標(biāo)簽中要用到日期型函數(shù)。工程實(shí)現(xiàn)：畫鐘面添加標(biāo)簽參加定時(shí)器添加定時(shí)器代碼參加秒針參加分針和時(shí)針修改代碼設(shè)置窗體保存程序相關(guān)知識(shí)：1、函數(shù)：函數(shù)是一種特定的運(yùn)算，在程序中要使用一個(gè)函數(shù)時(shí)，只要給出函數(shù)名及參數(shù)，就能得到它的函數(shù)值，如sin(x)是求弧度值為x的正弦值的函數(shù)。在VB6中，一般函數(shù)由函數(shù)名和參數(shù)組成，參數(shù)需要外加括號(hào)。個(gè)別特殊的函數(shù)不需要參數(shù)時(shí)，可以直接給出函數(shù)名得到函數(shù)值，如Date函數(shù)得到當(dāng)前計(jì)算機(jī)的日期值，Time函數(shù)得到當(dāng)前計(jì)算機(jī)的時(shí)間值。2、語法建立程序語句時(shí)必須遵從的構(gòu)造規(guī)那么稱為語法。在輸入語句的過程中，VB將自動(dòng)對(duì)輸入的內(nèi)容進(jìn)行語法檢查，如果發(fā)現(xiàn)語法錯(cuò)誤，將彈出一個(gè)信息框提示出錯(cuò)的原因。教學(xué)資源作業(yè)內(nèi)容設(shè)計(jì)一時(shí)鐘教學(xué)后記備注課次第次2課時(shí)課型周次第8周授課日期年月日課題簡(jiǎn)單程序設(shè)計(jì)——數(shù)值交換教學(xué)目標(biāo)知識(shí)目標(biāo)1、賦值語句技能目標(biāo)初步掌握賦值語句的用法；素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)培養(yǎng)學(xué)生分析問題、解決問題能力重點(diǎn)難點(diǎn)賦值語句的靈活應(yīng)用教學(xué)方法設(shè)計(jì)講授、討論法、上機(jī)操作教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入方法及內(nèi)容認(rèn)識(shí)賦值語句：賦值語句的一般格式為：[Let]<名稱>=<表達(dá)式>其中，“[Let]〞是可選項(xiàng)，一般情況下可省略?！?lt;名稱>〞是變量或?qū)傩缘拿Q，“<表達(dá)式>〞是指某運(yùn)算式。在使用賦值語句時(shí)，需注意以下幾點(diǎn)：〔1〕賦值語句兼有計(jì)算與賦值的雙重功能，它首先計(jì)算賦值號(hào)“=〞右邊表達(dá)式的值，然后把結(jié)果賦給賦值號(hào)左邊的變量〔或?qū)傩浴?。?〕賦值號(hào)“=〞與數(shù)學(xué)上的等號(hào)意義是不一樣的。〔3〕賦值號(hào)兩邊的數(shù)據(jù)類型必須一致，否那么會(huì)出現(xiàn)“類型不匹配〞錯(cuò)誤。賦值語句語法：變量名|對(duì)象的屬性名=表達(dá)式功能：將表達(dá)式的值賦給指定的變量或?qū)ο蟮膶傩?。說明：賦值語句在程序設(shè)計(jì)中的使用非常廣泛，每一個(gè)賦值語句可以單獨(dú)放在一行中，也可以將多條賦值語句放在一行中，但每一語句間必須用“：〞冒號(hào)作為分隔符?！纠块L(zhǎng)和寬，求矩形的面積。設(shè)計(jì)步驟如下：⑴設(shè)計(jì)程序界面。選擇“新建〞工程，然后在窗體中增加一個(gè)標(biāo)簽Label1，一個(gè)命令按鈕Command1和一個(gè)文本框Text1。⑵設(shè)置對(duì)象屬性。如表2.8所示。表2.8屬性設(shè)置對(duì)象屬性屬性值Label1Caption：長(zhǎng)=5，寬=7Label2CaptionCommand1Caption那么矩形面積=⑶編寫事件代碼。命令按鈕Command1的Click事件代碼為：PrivateSubCommand1_Click()DimaAsSingle,bAsSingle,areaAsSinglea=5b=7area=a*bLabel2.Caption=Str(area)EndSub練習(xí)：書101頁教學(xué)資源作業(yè)內(nèi)容教學(xué)后記備注課次第次2課時(shí)課型周次第9周授課日期年月日課題簡(jiǎn)單程序設(shè)計(jì)——數(shù)值交換教學(xué)目標(biāo)知識(shí)目標(biāo)1、賦值語句技能目標(biāo)初步掌握賦值語句的用法；素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)培養(yǎng)學(xué)生分析問題、解決問題能力重點(diǎn)難點(diǎn)賦值語句的靈活應(yīng)用教學(xué)方法設(shè)計(jì)上機(jī)操作教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入方法及內(nèi)容要求學(xué)生討論分析并編程實(shí)現(xiàn)以下工程：從鍵盤分別輸入兩個(gè)數(shù)據(jù)，單擊“交換〞按鈕完成兩個(gè)數(shù)值的交換。界面如下：教學(xué)資源作業(yè)內(nèi)容教學(xué)后記備注課次第次2課時(shí)課型周次第9周授課日期年月日課題簡(jiǎn)單程序設(shè)計(jì)——數(shù)值交換教學(xué)目標(biāo)知識(shí)目標(biāo)1、賦值語句技能目標(biāo)初步掌握賦值語句的用法；素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)培養(yǎng)學(xué)生分析問題、解決問題能力重點(diǎn)難點(diǎn)賦值語句的靈活應(yīng)用教學(xué)方法設(shè)計(jì)演示、學(xué)生討論教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入方法及內(nèi)容編程實(shí)現(xiàn)以下工程：從鍵盤分別輸入兩個(gè)數(shù)據(jù)，單擊“交換〞按鈕完成兩個(gè)數(shù)值的交換。分析：這是一個(gè)數(shù)值交換程序。分別在TEXT1和TEXT2中輸入數(shù)值1和數(shù)值2，單擊“交換〞按鈕，那么text1中顯示的是數(shù)值2，text2中顯示的是數(shù)值1；單擊“去除〞按鈕，那么去除text1和text2中的內(nèi)容；單擊“結(jié)束〞按鈕，退出該程序。首先通過賦值語句將數(shù)據(jù)從文本框中取出，用不同的變量來存放數(shù)據(jù)，交換后再放入到文本框中，然后通過單擊按鈕來實(shí)現(xiàn)計(jì)算、清空和結(jié)束的功能。演示步驟如下：創(chuàng)立界面設(shè)置各對(duì)象的屬性編寫代碼運(yùn)行程序保存界面如下：教學(xué)資源作業(yè)內(nèi)容將窗體中的數(shù)值換成字符，該如何修改界面和代碼？教學(xué)后記課次第次2課時(shí)課型周次第9周授課日期年月日課題簡(jiǎn)易文本編輯器教學(xué)目標(biāo)知識(shí)目標(biāo)變量及常量技能目標(biāo)掌握變量、常量的聲明及使用。素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)培養(yǎng)學(xué)生協(xié)作精神、分析問題、解決問題能力重點(diǎn)難點(diǎn)變量、常量的聲明及使用教學(xué)方法設(shè)計(jì)講授、上機(jī)操作教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入方法及內(nèi)容常量及變量：1.常量常量聲明格式：[Public|Private]Const常量名[astype]=value2.變量一、變量的命名規(guī)那么1.以字母或漢字開頭，后可跟字母、數(shù)字或下劃線組成.2.變量名最長(zhǎng)為255個(gè)字符；3.VB中不區(qū)分變量名的大小寫；4.不能使用VB中關(guān)鍵字；二、聲明變量有兩種方式：顯式聲明和隱式聲明。(1)顯式聲明語法聲明格式：Dim|Static|Public|Private<變量名>As<數(shù)據(jù)類型>語句功能：聲明變量并分配存儲(chǔ)空間。(2)隱式聲明語法聲明格式：Dim<變量名>〔或者不聲明變量，而直接使用變量〕3變量作用域不同作用域變量的聲明方式作用范圍局部變量模塊級(jí)變量公共變量聲明方式Dim，StaticDim，PrivatePublic變量的聲明位置過程內(nèi)部模塊的聲明段模塊的聲明段本模塊中其他過程能否訪問不能能能其他模塊能否訪問不能不能能三、應(yīng)用舉例1、說明以下語句的作用y=3*x^3+5a=a+1

'說明：先計(jì)算右邊的值，然后再把計(jì)算結(jié)果賦給左邊的變量2、例：計(jì)算圓的面積和周長(zhǎng)1、設(shè)計(jì)界面和運(yùn)行界面，如下圖。2、代碼：OptionExplicit------------------------------------------------PrivateSubCommand1_Click()DimpiAsSingle,rAsSingle,lAsSingle,sAsSingler=Val(t1.Text)pi=3.14l=2*pi*rs=

pi*r^2l1.Caption=Str(l)l2.Caption=Str(s)EndSub****注意****val(字符串)：把字符串轉(zhuǎn)換為數(shù)值；str(數(shù)值)：

把數(shù)值轉(zhuǎn)換為字符串

輸入的數(shù)據(jù)是字符型,轉(zhuǎn)換成數(shù)值型才能進(jìn)行計(jì)算；標(biāo)簽的Caption屬性是字符型，所以輸時(shí)又要把計(jì)算結(jié)果轉(zhuǎn)換成字符型。教學(xué)資源作業(yè)內(nèi)容教學(xué)后記備注課次第次2課時(shí)課型周次第10周授課日期年月日課題簡(jiǎn)易文本編輯器教學(xué)目標(biāo)知識(shí)目標(biāo)變量及常量技能目標(biāo)掌握變量、常量的聲明及使用。素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)培養(yǎng)學(xué)生協(xié)作精神、分析問題、解決問題能力重點(diǎn)難點(diǎn)變量、常量的聲明及使用教學(xué)方法設(shè)計(jì)上機(jī)操作教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入方法及內(nèi)容要求學(xué)生討論并編程實(shí)現(xiàn)——簡(jiǎn)易文本編輯器功能：本程序可以對(duì)文本框進(jìn)行復(fù)制、剪切、粘貼、刪除、去除等操作。界面如下：教學(xué)資源作業(yè)內(nèi)容教學(xué)后記備注課次第次2課時(shí)課型周次第10周授課日期年月日課題簡(jiǎn)易文本編輯器教學(xué)目標(biāo)知識(shí)目標(biāo)變量及常量技能目標(biāo)掌握變量、常量的聲明及使用。素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)培養(yǎng)學(xué)生協(xié)作精神、分析問題、解決問題能力重點(diǎn)難點(diǎn)變量、常量的聲明及使用教學(xué)方法設(shè)計(jì)演示、學(xué)生討論教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入方法及內(nèi)容編程實(shí)現(xiàn)——簡(jiǎn)易文本編輯器功能：本程序可以對(duì)文本框進(jìn)行復(fù)制、剪切、粘貼、刪除、去除等操作。分析：這是一個(gè)簡(jiǎn)易文本編輯器。在TEXT1中選擇需要復(fù)制或剪切的內(nèi)容，單擊“剪切〞按鈕可以實(shí)現(xiàn)剪切功能，單擊“復(fù)制〞按鈕可以實(shí)現(xiàn)復(fù)制功能；然后將光標(biāo)移動(dòng)到需要粘貼的位置，單擊“粘貼〞按鈕，即可把剪切或復(fù)制的內(nèi)容粘貼到目標(biāo)位置；單擊“退出〞按鈕結(jié)束。在這個(gè)程序中，涉及文本編輯屬性中的seltext屬性，該屬性是用來選定字符，如果沒有字符被選定的話，就是空字符。剪切、復(fù)制和粘貼就是通過一個(gè)模塊級(jí)變量來實(shí)現(xiàn)的。步驟演示：創(chuàng)立用戶界面設(shè)置各對(duì)象屬性編寫代碼運(yùn)行程序保存界面如下：教學(xué)資源作業(yè)內(nèi)容如果再添加2個(gè)“全選〞和“清空〞按鈕，應(yīng)該如何修改窗體和代碼？教學(xué)后記課次第次2課時(shí)課型周次第10周授課日期年月日課題簡(jiǎn)易計(jì)算器教學(xué)目標(biāo)知識(shí)目標(biāo)算術(shù)運(yùn)算符及表達(dá)式技能目標(biāo)熟悉VB語言中表達(dá)式的使用素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)培養(yǎng)學(xué)生協(xié)作精神、分析問題、解決問題能力重點(diǎn)難點(diǎn)表達(dá)式的應(yīng)用教學(xué)方法設(shè)計(jì)講授、上機(jī)練習(xí)教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入方法及內(nèi)容表達(dá)式及運(yùn)算符：1.算術(shù)運(yùn)算符及算術(shù)表達(dá)式〔1〕“/〞和“\〞運(yùn)算符的區(qū)別；〔2〕“MOD〞運(yùn)算符的運(yùn)用〔3〕寫VB表達(dá)式時(shí)，要注意的幾點(diǎn)；2.字符運(yùn)算符及字符表達(dá)式字符運(yùn)算符用于將兩個(gè)字符型表達(dá)式連接生成一個(gè)新字符串。其運(yùn)符主要有“+〞運(yùn)算符和“&〞運(yùn)算符 當(dāng)兩個(gè)表達(dá)式的其中一個(gè)是數(shù)值型時(shí)，“+〞做為算術(shù)運(yùn)算符進(jìn)行加法運(yùn)算，當(dāng)兩個(gè)表達(dá)式都是字符型時(shí)，才做為連接運(yùn)算符。3.關(guān)系運(yùn)算符及關(guān)系表達(dá)式

> < >= <= <>4.邏輯運(yùn)算符及邏輯表達(dá)式NOT AND OR XOR EQV IMP5.運(yùn)算符的優(yōu)先順序在一個(gè)表達(dá)式中，如果同時(shí)有多個(gè)運(yùn)算符存在，那么它們的優(yōu)先順序由高到低依次為：算術(shù)運(yùn)算符→字符運(yùn)算符→關(guān)系運(yùn)算符→邏輯運(yùn)算符算術(shù)運(yùn)算符的優(yōu)先級(jí)順序由高到低依次為：∧〔指數(shù)運(yùn)算〕；-〔負(fù)數(shù)〕；*，/〔乘法，浮點(diǎn)除法〕；\〔整數(shù)除法〕；Mod〔取模運(yùn)算〕；+，-〔加法，減法〕。其中，“*〞，“/〞具有相同的優(yōu)先級(jí)；“+〞，“-〞具有相同的優(yōu)先級(jí)。在關(guān)系運(yùn)算符中，所有的運(yùn)算符具有相同的優(yōu)先級(jí)。邏輯運(yùn)算符的優(yōu)先級(jí)順序由高到抵依次為：Not〔非〕，And〔與〕，Or〔或〕，Xor〔異或〕，Eqv〔同或〕，Imp〔蘊(yùn)含〕。用括號(hào)控制運(yùn)算的優(yōu)先次序可以是程序清晰易讀，而且不易出錯(cuò)。[例2.4]寫出VB表達(dá)式4*6>3*7OrNot5>2的值。計(jì)算步驟如下：⑴算術(shù)運(yùn)算：24>21OrNot5>2⑵關(guān)系運(yùn)算：TrueOrNotTrue⑶邏輯運(yùn)算：TrueOrFalse⑷結(jié)果：True課堂練習(xí)：教學(xué)資源作業(yè)內(nèi)容教學(xué)后記備注課次第次2課時(shí)課型周次第11周授課日期年月日課題簡(jiǎn)易計(jì)算器教學(xué)目標(biāo)知識(shí)目標(biāo)算術(shù)運(yùn)算符及表達(dá)式技能目標(biāo)熟悉VB語言中表達(dá)式的使用素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)培養(yǎng)學(xué)生協(xié)作精神、分析問題、解決問題能力重點(diǎn)難點(diǎn)表達(dá)式的應(yīng)用教學(xué)方法設(shè)計(jì)上機(jī)操作教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入方法及內(nèi)容要求學(xué)生討論并編程實(shí)現(xiàn)——簡(jiǎn)易計(jì)算器功能：本程序要求從鍵盤分別輸入兩個(gè)數(shù)據(jù)，單擊“開始〞按鈕，就可以進(jìn)行加、減、乘、除的四那么運(yùn)算。界面如下：教學(xué)資源作業(yè)內(nèi)容教學(xué)后記備注課次第次2課時(shí)課型周次第11周授課日期年月日課題IF語句教學(xué)目標(biāo)知識(shí)目標(biāo)熟悉If…Then結(jié)構(gòu)，If…Then…Else結(jié)構(gòu)技能目標(biāo)能用if語句編寫程序素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)提高學(xué)生學(xué)習(xí)興趣重點(diǎn)難點(diǎn)If語句的應(yīng)用教學(xué)方法設(shè)計(jì)講授、上機(jī)練習(xí)教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入方法及內(nèi)容在程序設(shè)計(jì)中經(jīng)常遇到這類問題，它需要根據(jù)不同的情況采用不同的處理方法。例如，一元二次方程的求根問題，要根據(jù)判別式小于零或大于等于零的情況，采用不同的數(shù)學(xué)表達(dá)式進(jìn)行計(jì)算。對(duì)于這類問題，如果用順序結(jié)構(gòu)編程，顯然力不從心。必須借助分支結(jié)構(gòu)。一、If

語句格式：

If

條件

then

語句塊1

[

Else

語句塊2]

End

If說明：〔1〕“條件〞一般為關(guān)系表達(dá)式或邏輯表達(dá)式。通常把關(guān)系表達(dá)式或邏輯表達(dá)式的值為真時(shí)，稱為條件滿足；值為假時(shí)，稱為條件不滿足。反之亦然。判斷以下條件是否成立:1、1<0；2、1=0；3、1<=0；4、3>=3；5、3<=3〔2〕語句塊1、語句塊2分別是“條件〞滿足或不滿足時(shí)，處理方法的描述，可以是假設(shè)干個(gè)語句?！?〕If…Then

、Else、End

If

是VB的保存字。功能：〔1〕塊If首先判斷“條件〞，其值為真時(shí)，執(zhí)行語句塊1；為假時(shí)執(zhí)行語句塊2。當(dāng)缺省[Else…]中的內(nèi)容時(shí)，該分支結(jié)構(gòu)只對(duì)條件滿足的情況進(jìn)行處理。執(zhí)行過程如下圖。二、實(shí)例：火車站行李費(fèi)的收費(fèi)標(biāo)準(zhǔn)是50kg以內(nèi)〔包括50kg〕0.20/kg，超過局部0.50/kg。編寫程序，要求根據(jù)輸入的任意重量，計(jì)算出應(yīng)付的行李費(fèi)。根據(jù)題意計(jì)算公式如下：1、界面設(shè)計(jì)：2、屬性設(shè)置：3、代碼：

〔1〕

〞計(jì)算"按鈕的代碼

Private

Sub

Command1_Click()

Dim

w

as

single，pay

as

single

w=

If

w

>

50

Then

pay

=(w

-

50)*

+

50

*

Else

pay

=

w

*

End

If

=

pay

End

Sub

〔2〕

〞清空"按鈕的代碼

Private

Sub

Command2_Click〔〕

=

""

=

""

End

Sub

〔3〕

〞退出"按鈕的代碼

Private

Sub

Command3_Click〔〕

End

End

Sub

教學(xué)資源作業(yè)內(nèi)容設(shè)計(jì)一程序：根據(jù)輸入的價(jià)格，求商品實(shí)際應(yīng)付款〔價(jià)格超過1000打9折，超過2000打8折，超過5000打7折〕教學(xué)后記課次第次2課時(shí)課型周次第11周授課日期年月日課題IF語句教學(xué)目標(biāo)知識(shí)目標(biāo)熟悉If…Then結(jié)構(gòu)，If…Then…Else結(jié)構(gòu)技能目標(biāo)能用if語句編寫程序素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)提高學(xué)生學(xué)習(xí)興趣重點(diǎn)難點(diǎn)If語句的應(yīng)用教學(xué)方法設(shè)計(jì)上機(jī)操作教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入方法及內(nèi)容編程實(shí)現(xiàn)：1、(a不為0)提示：如果那么輸出“方程無實(shí)數(shù)根〞，否那么輸出方程兩實(shí)根。

將x1,x2的值轉(zhuǎn)換成VB表達(dá)式為x1=(-b+sqr(b^2-4*a*c))/(2*a)x2=(-b-sqr(b^2-4*a*c))/(2*a)編寫程序，要求能判斷某個(gè)年份是否是閏年？提示：能被4整除但不能被100整除的，或者能被400整除的是閏年。教學(xué)資源作業(yè)內(nèi)容教學(xué)后記備注課次第次2課時(shí)課型周次第12周授課日期年月日課題SelectCase語句教學(xué)目標(biāo)知識(shí)目標(biāo)熟悉Select…Case結(jié)構(gòu)技能目標(biāo)能用case語句編寫程序素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)提高學(xué)生學(xué)習(xí)興趣重點(diǎn)難點(diǎn)case語句的應(yīng)用教學(xué)方法設(shè)計(jì)講授、上機(jī)練習(xí)教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入方法及內(nèi)容Select

Case語句是多分支語句，又稱為情況語句。格式：Select

Case

測(cè)試表達(dá)式

Case

表達(dá)式列表1

語句塊1

Case

表達(dá)式列表2

語句塊2

…

Case

表達(dá)式列表n

語句塊n

[Case

Else

語句塊n+1]End

Select功能：根據(jù)“測(cè)試表達(dá)式〞的值，選擇第一個(gè)符合條件的語句塊執(zhí)行。

Select

Case語句的執(zhí)行過程是：先求“測(cè)試表達(dá)式〞的值，然后順序測(cè)試該值符合哪一個(gè)Case子句中情況，如果找到了，那么執(zhí)行該Case子句下面的語句塊，然后執(zhí)行End

Select下面的語句；如果沒找到，那么執(zhí)行Case

Else下面的語句塊，然后執(zhí)行End

Select下面的語句。說明：

“測(cè)試表達(dá)式〞可以是數(shù)值表達(dá)式或字符表達(dá)式；

“表達(dá)式列表〞形式有以下3種：〔1〕一個(gè)表達(dá)式或用逗號(hào)隔開的假設(shè)干表達(dá)式select

case

val(t1.text)

case

1,3,5

L1.caption=〞這是奇數(shù)〞

case

2,4,6

L1.caption=〞這是偶數(shù)〞end

select〔2〕表達(dá)式1

To

表達(dá)式2select

case

case

1

to

9

=〞此數(shù)是在1到10的范圍內(nèi)〞

case

“A〞

to

“Z〞

=〞請(qǐng)輸入數(shù)字〞end

select〔3〕Is

關(guān)系運(yùn)算符

表達(dá)式select

case

val(t1.text)

case

is>=30

=〞此數(shù)的范圍大于30

case

is>=20

=〞此數(shù)的范圍大于20

case

is>=10

=〞此數(shù)的范圍大于10end

select【例】輸入一個(gè)學(xué)生的一門課分?jǐn)?shù)x〔百分制〕，當(dāng)x≥90時(shí)，輸出“優(yōu)秀〞；當(dāng)80≤x＜90

時(shí)，輸出“良好〞；當(dāng)

70≤x＜80

時(shí)，輸出“中〞；當(dāng)60≤x＜70

時(shí)，輸出“及格〞，當(dāng)

x＜60

時(shí)，輸出“不及格〞。(1)界面設(shè)計(jì)

(2)代碼設(shè)計(jì)PrivateSubCommand1_Click〔〕

Dimscore!

score=val(Text1.Text)

SelectCasescore

CaseIs>=90

Text2.Text="優(yōu)秀"

CaseIs>=80

Text2.Text="良好"

CaseIs>=70

Text2.Text="中"

CaseIs>=60

Text2.Text="及格"

CaseElse

Text2.Text="不及格"

EndSelect

EndSub練習(xí)：求分段函數(shù)的值。教學(xué)資源作業(yè)內(nèi)容教學(xué)后記課次第次2課時(shí)課型周次第12周授課日期年月日課題體育彩票模擬器教學(xué)目標(biāo)知識(shí)目標(biāo)常用函數(shù)技能目標(biāo)常用函數(shù)的使用素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)培養(yǎng)學(xué)生的學(xué)習(xí)興趣重點(diǎn)難點(diǎn)函數(shù)的使用教學(xué)方法設(shè)計(jì)講授，學(xué)生討論，上機(jī)練習(xí)教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入方法及內(nèi)容

數(shù)學(xué)上的函數(shù)，是指對(duì)一個(gè)或多個(gè)自變量進(jìn)行特定的計(jì)算，獲得一個(gè)因變量的值。在VB程序設(shè)計(jì)中，擴(kuò)充了函數(shù)的定義，使用起來更為靈活。VB為用戶預(yù)定義了一批內(nèi)部函數(shù)，供用戶隨時(shí)調(diào)用。

函數(shù)都帶有一個(gè)或幾個(gè)自變量，稱之為“參數(shù)〞。函數(shù)對(duì)這些參數(shù)運(yùn)算，返回一個(gè)結(jié)果值。函數(shù)的一般調(diào)用格式為：

<函數(shù)名>([<參數(shù)表<])

如：sqr(9)

rgb(0,0,0)

date()

其中，函數(shù)的參數(shù)可以是常量、變量或表達(dá)式。假設(shè)有多個(gè)參數(shù)，參數(shù)之間以逗號(hào)分隔。

這些函數(shù)按其分類主要有以下幾個(gè)類別的函數(shù)：一、轉(zhuǎn)換函數(shù)二、數(shù)值函數(shù)**注意**要產(chǎn)生[a,b]區(qū)間范圍內(nèi)的隨機(jī)整數(shù)，可以使用公式：int((b-a+1)*rnd+a)。例如：要產(chǎn)生[10,100]區(qū)間的隨機(jī)整數(shù)，可以使用公式int(91*rnd+10)獲得。三、字符串函數(shù)四、日期時(shí)間函數(shù)五、其他函數(shù)作業(yè)：

教學(xué)資源作業(yè)內(nèi)容課次第次2課時(shí)課型周次第12周授課日期年月日課題體育彩票模擬器教學(xué)目標(biāo)知識(shí)目標(biāo)常用函數(shù)技能目標(biāo)常用函數(shù)的使用素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)培養(yǎng)學(xué)生的學(xué)習(xí)興趣重點(diǎn)難點(diǎn)函數(shù)的使用教學(xué)方法設(shè)計(jì)上機(jī)操作教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入方法及內(nèi)容要求學(xué)生討論編程實(shí)現(xiàn)——體育彩票模擬器功能：模擬搖號(hào)，自動(dòng)生成3個(gè)一位數(shù)，與預(yù)測(cè)號(hào)碼作比擬，如果號(hào)碼相同，那么提示用戶“祝賀你，你中獎(jiǎng)了！〞否那么提示“再接再歷哦！〞界面如下：教學(xué)資源作業(yè)內(nèi)容教學(xué)后記備注課次第次2課時(shí)課型周次第13周授課日期年月日課題體育彩票模擬器教學(xué)目標(biāo)知識(shí)目標(biāo)常用函數(shù)技能目標(biāo)常用函數(shù)的使用素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)培養(yǎng)學(xué)生的學(xué)習(xí)興趣重點(diǎn)難點(diǎn)函數(shù)的使用教學(xué)方法設(shè)計(jì)演示、學(xué)生討論、上機(jī)操作教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入方法及內(nèi)容編程實(shí)現(xiàn)——體育彩票模擬器功能：模擬搖號(hào)，自動(dòng)生成3個(gè)一位數(shù)，與預(yù)測(cè)號(hào)碼作比擬，如果號(hào)碼相同，那么提示用戶“祝賀你，你中獎(jiǎng)了！〞否那么提示“再接再歷哦！〞分析：?jiǎn)螕簟邦A(yù)測(cè)〞按鈕，通過輸入對(duì)話框，輸入一個(gè)三位的預(yù)測(cè)號(hào)碼后顯示在預(yù)測(cè)號(hào)碼文本框TEXT4中；單擊“搖號(hào)〞按鈕，自動(dòng)生成3個(gè)一位數(shù)分別顯示在文本框TEXT1、TEXT2、TEXT3中，并與用戶預(yù)測(cè)的號(hào)碼進(jìn)行比擬，如果相同的話，那么提示“祝賀你，你中獎(jiǎng)了！〞否那么提示“再接再歷哦！〞。演示實(shí)現(xiàn)步驟：創(chuàng)立用戶界面設(shè)置各對(duì)象的屬性編寫代碼運(yùn)行程序保存界面如下：教學(xué)資源作業(yè)內(nèi)容教學(xué)后記課次第次2課時(shí)課型周次第13周授課日期年月日課題FOR循環(huán)教學(xué)目標(biāo)知識(shí)目標(biāo)For循環(huán)語句技能目標(biāo)能利用For循環(huán)語句編寫程序素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)培養(yǎng)學(xué)生協(xié)作精神、分析問題、解決問題能力重點(diǎn)難點(diǎn)For…Next循環(huán)的用法教學(xué)方法設(shè)計(jì)講授、上機(jī)練習(xí)教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入方法及內(nèi)容在程序中，但凡需要重復(fù)相同或相似的操作步驟，都可以用循環(huán)結(jié)構(gòu)來實(shí)現(xiàn)。例如：計(jì)算1+2+3+...+1000；計(jì)算1*2*3*....*1000等等。一、結(jié)構(gòu)：

For循環(huán)的一般格式如下：

For

循環(huán)變量=初值

To

終值

[Step

步長(zhǎng)]

[循環(huán)體]

Next

[循環(huán)變量]

二、說明：1．格式中各項(xiàng)的說明

·

循環(huán)變量：亦稱為循環(huán)控制變量，必須為數(shù)值型。

·

初值、終值：都是數(shù)值型，可以是數(shù)值表達(dá)式。

·

步長(zhǎng)：循環(huán)變量的增量，是一個(gè)數(shù)值表達(dá)式。一般來說，其值為正，初值

應(yīng)小于終值；假設(shè)為負(fù)，初值應(yīng)大于終值。但步長(zhǎng)不能是0。如果步長(zhǎng)是1，

Step

1可略去不寫。

·

循環(huán)體：在For語句和Next語句之間的語句序列。

·

Next后面的循環(huán)變量與For語句中的循環(huán)變量必須相同。2．執(zhí)行過程For循環(huán)語句的執(zhí)行過程如下：〔1〕系統(tǒng)將初值賦給循環(huán)變量，并自動(dòng)記下終值和步長(zhǎng)。〔2〕檢查循環(huán)變量的值是否超過終值。如果超過就結(jié)束循環(huán)，執(zhí)行Next后面的語句；否那么，執(zhí)行一次循環(huán)體?！?〕執(zhí)行Next語句，將循環(huán)變量增加一個(gè)步長(zhǎng)值再賦給循環(huán)變量，轉(zhuǎn)到〔2〕繼續(xù)執(zhí)行。

以上執(zhí)行過程用流程圖描述，如以下圖所示。

這里所說的“超過〞有兩種含義，即大于或小于。當(dāng)步長(zhǎng)為正值時(shí)，循環(huán)變量大于終值為“超過〞；當(dāng)步長(zhǎng)為負(fù)值時(shí)，循環(huán)變量小于終值為“超過〞。我們通過分析下面的程序來進(jìn)一步理解For語句的執(zhí)行過程。

For

n=1

To

10

Step

3

Print

n，

Next

n具體執(zhí)行情況如下：

上面程序的執(zhí)行結(jié)果為：

1

4

7

103．考前須知

For語句和Next語句必須成對(duì)出現(xiàn)，缺一不可，且For語句必須在Next語句之前。循環(huán)次數(shù)由初值、終值和步長(zhǎng)確定，計(jì)算公式為：

循環(huán)次數(shù)=Int〔〔終值－初值〕/步長(zhǎng)〕+1舉例分析：

For

i

=

1

To

10

Print

i;

Next

i執(zhí)行此語句將輸出：

1

2

3

4

5

6

7

8

9

10

i是循環(huán)變量，它的初值為1，執(zhí)行print語句，輸出1；然后使i的值增加1，直到i的值超過終值10，就不再執(zhí)行循環(huán)，它的流程如下圖：

教學(xué)資源作業(yè)內(nèi)容(1)

求s=1+3+5+…+101的值

(2)

求s=1*3*5*…*101的值

教學(xué)后記備注課次第次2課時(shí)課型周次第13周授課日期年月日課題DO循環(huán)教學(xué)目標(biāo)知識(shí)目標(biāo)DO循環(huán)語句技能目標(biāo)能利用DO循環(huán)語句編寫程序素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)培養(yǎng)學(xué)生協(xié)作精神、分析問題、解決問題能力重點(diǎn)難點(diǎn)Do…Loop循環(huán)的用法教學(xué)方法設(shè)計(jì)講授、上機(jī)練習(xí)教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入方法及內(nèi)容Do…Loop循環(huán)結(jié)構(gòu)語句格式1：Do[{While|Until}條件][語句塊][ExitDo][語句塊]Loop語句格式2：Do[語句塊][ExitDo][語句塊]Loop[{While|Until}條件]說明：在循環(huán)次數(shù)不能確定的情況下進(jìn)行的，那么這時(shí)便需要用到循環(huán)控制結(jié)構(gòu)Do…Loop【例】用Do…Loop循環(huán)結(jié)構(gòu)實(shí)現(xiàn)求和sum=1+2+3+…+100。編寫程序代碼。解法一：采用當(dāng)型循環(huán)DoWhile…LoopPrivateSubCommand1_Click()DimiAsInteger,sumAsIntegeri=1'計(jì)數(shù)器初值置為1sum=0'累加器初值置為0DoWhilei<=100'當(dāng)型循環(huán)sum=sum+ii=i+1'每次循環(huán)變量加1LoopLabel2.Caption=Str(sum)EndSub解法二：采用直到型循環(huán)DoUntil…LoopPrivateSubCommand1_Click()DimiAsInteger,sumAsIntegeri=1'計(jì)數(shù)器初值置為1sum=0'累加器初值置為0DoUntili>100sum=sum+ii=i+1LoopLabel2.Caption=Str(sum)EndSub教學(xué)資源作業(yè)內(nèi)容教學(xué)后記備注課次第次2課時(shí)課型周次第14周授課日期年月日課題雞兔同籠教學(xué)目標(biāo)知識(shí)目標(biāo)DO循環(huán)語句技能目標(biāo)能利用DO循環(huán)語句編寫程序素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)培養(yǎng)學(xué)生協(xié)作精神、分析問題、解決問題能力重點(diǎn)難點(diǎn)DO循環(huán)的用法教學(xué)方法設(shè)計(jì)上機(jī)操作，演示教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入方法及內(nèi)容要求學(xué)生編寫程序解決以下問題：題目：雞有兩條腿，兔有4條腿，雞兔同籠。雞和兔的總只數(shù)和總腿數(shù)，求雞、兔各有多少支。代碼：DimCAsInteger,RAsInteger,HAsInteger,FAsIntegerH=Val(InputBox("請(qǐng)輸入雞兔總數(shù)(>=2):"))IfH<2ThenExitSubDoF=Val(InputBox("請(qǐng)輸入雞兔總腿數(shù)，"&"該數(shù)字必須是>"&2*H&",并且<"&4*H&"的偶數(shù)"))IfF=0ThenExitSubIfF<=2*HOrF>=4*HOrFMod2ThenMsgBox"輸入錯(cuò)誤，請(qǐng)重新輸入！"ElseExitDoEndIfLoopR=(F-2*H)/2C=H-RClsPrint"籠中有雞";C;"只";"兔";R;"只"教學(xué)資源作業(yè)內(nèi)容教學(xué)后記備注課次第次2課時(shí)課型周次第14周授課日期年月日課題評(píng)委亮分教學(xué)目標(biāo)知識(shí)目標(biāo)熟悉一維數(shù)組的概念。技能目標(biāo)熟悉一維數(shù)組的使用方法。素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)培養(yǎng)學(xué)生協(xié)作精神、分析問題、解決問題能力重點(diǎn)難點(diǎn)一維數(shù)組的使用教學(xué)方法設(shè)計(jì)講授、上機(jī)練習(xí)教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入方法及內(nèi)容數(shù)組就是很多元素的變量名相同，在內(nèi)存中是連續(xù)存儲(chǔ)的假設(shè)干個(gè)存儲(chǔ)單元，每個(gè)數(shù)組元素的類型一樣，為了區(qū)分這些元素，為每個(gè)元素賦予不同的下標(biāo)值。數(shù)組的聲明〔也叫做定義〕：[Public|Private|Dim|Static]數(shù)組名〔下標(biāo)1[，下標(biāo)2[…]]〕[as數(shù)據(jù)類型]。數(shù)組的定義舉例:Dima(5)AsIntegerDimb(3to8)AsIntegerDimc(8)說明：a(5)共有6個(gè)元素，分別是a(0)、a(1)、a(2)、a(3)、a(4)和a(5)，b數(shù)組共有6個(gè)元素分別是b(3)、b(4)…b(8)，c數(shù)組共有c(0)、c(1)…c(8)共9個(gè)元素。如果不習(xí)慣以0為下標(biāo)起點(diǎn)，可以設(shè)置下標(biāo)為1，OptionBase1，該語句有只有兩個(gè)值，分別是OptionBase1和OptionBase0，其中OptionBase0是默認(rèn)值。程序舉例:下面的程序可以求一維數(shù)組的最大元素以及最大元素的下標(biāo)。編寫代碼OptionBase1PrivateSubCommand1_Click()Dima(10)AsIntegerDimxbAsIntegerFori=1To10a(i)=Val(InputBox("輸入數(shù)組元素"))Nextixb=1:zuida=a(1)Fori=2To10Ifa(i)>zuidaThenzuida=a(i)：xb=iEndIfNextiPrintzuida,xbEndSub練習(xí)：統(tǒng)計(jì)某班〔假設(shè)有30人〕程序設(shè)計(jì)課程考試的平均成績(jī)，并輸出高于平均分的成績(jī)。教學(xué)資源作業(yè)內(nèi)容教學(xué)后記備注課次第次2課時(shí)課型周次第14周授課日期年月日課題最高分和最低分教學(xué)目標(biāo)知識(shí)目標(biāo)IF語句；FOR語句；一維數(shù)組技能目標(biāo)能靈活應(yīng)用IF語句；FOR語句；一維數(shù)組編寫程序素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)提高學(xué)生學(xué)習(xí)興趣重點(diǎn)難點(diǎn)IF語句、FOR語句及一維數(shù)組的應(yīng)用教學(xué)方法設(shè)計(jì)上機(jī)操作教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入方法及內(nèi)容編寫以下程序：1、求N！的值，其中N由鍵盤輸入。2、在窗體上打印一個(gè)有規(guī)律的圖案，見以下圖：教學(xué)資源作業(yè)內(nèi)容教學(xué)后記備注課次第次2課時(shí)課型周次第15周授課日期年月日課題圖像瀏覽器教學(xué)目標(biāo)知識(shí)目標(biāo)圖像框技能目標(biāo)熟悉圖像框的常見屬性、方法和事件。素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)培養(yǎng)學(xué)生協(xié)作精神、分析問題、解決問題能力重點(diǎn)難點(diǎn)圖像框的常見屬性、方法和事件教學(xué)方法設(shè)計(jì)講授、上機(jī)練習(xí)教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入方法及內(nèi)容圖像框〔ImageBox〕只能用于顯示圖形，沒有圖片框所擁有的其他功能；因此，圖像框比圖片框顯示速度快、占用內(nèi)存少。屬性〔1〕Picture屬性和圖片框的Picture屬性相同?！?〕stretch屬性指定是否縮放圖形來適應(yīng)控件大小。屬性值為True或False。False：縮放控件來適應(yīng)圖形的大小。此值為缺省值。True：縮放圖形來適應(yīng)控件的大小。此值可能會(huì)使顯示的圖形變形失真。應(yīng)用舉例設(shè)計(jì)程序，演示圖像框在stretch屬性不同選值時(shí)的狀態(tài)。分析：需要建立四個(gè)按鈕，其中二個(gè)實(shí)現(xiàn)設(shè)定圖像框的stretch屬性值為True或False；另二個(gè)用來放大、縮小圖像框，以演示stretch屬性值為True時(shí)圖形隨圖像框縮放?！踩鐖D〕〔a〕stretch值為False時(shí)〔b〕值為True并放大時(shí)〔c〕值為True并縮小時(shí)stretch屬性演示〔1〕界面設(shè)計(jì)在窗體上添加一個(gè)圖像框、四個(gè)命令按鈕。控件的大小、位置和命令按鈕的Caption屬性可參考圖4-3?！?〕編寫代碼依次雙擊窗體和各命令按鈕，輸入代碼如下。PrivateSubForm_Load()Image1.Picture=LoadPicture("C:\VB\Face03.ico")EndSub '在程序啟動(dòng)時(shí),為圖像框裝載圖標(biāo)“〞PrivateSubCommand1_Click() '“True〞按鈕事件過程Image1.Stretch=TrueEndSubPrivateSubCommand2_Click() '“False〞按鈕事件過程Image1.Stretch=FalseEndSubPrivateSubCommand3_Click() '“放大〞按鈕事件過程Image1.Width=Image1.Width*2Image1.Height=Image1.Height*2EndSub '把Image1的寬度和高度值乘2再賦給其Width、Height屬性PrivateSubCommand4_Click() '“縮小〞按鈕事件過程Image1.Width=Image1.Width/2Image1.Height=Image1.Height/2EndSub '把Image1的寬度和高度值的一半賦給其Width、Height屬性按F5鍵運(yùn)行程序，程序界面如圖4-3〔a〕所示，此時(shí)單擊“放大〞按鈕，雖然圖像框已經(jīng)擴(kuò)大一倍〔其不可見〕，但是因其Stretch值默認(rèn)為False，所以圖形并不隨圖像框的擴(kuò)大而擴(kuò)大。隨后點(diǎn)擊“True〞按鈕，將Stretch值更改為True，這時(shí)圖形會(huì)為適應(yīng)圖像框的大小而放大，如圖4-3〔b〕所示。正如圖4-3〔c〕所示，按“縮小〞按鈕，圖形會(huì)隨圖像框的縮小而變小。不管圖形及圖像框是在擴(kuò)大還是已縮小，只要單擊“False〞按鈕，都會(huì)使圖像框縮放到圖形原始大小的尺寸，來適應(yīng)圖形的正常顯示，如圖4-3〔a〕。運(yùn)行無誤后，請(qǐng)保存工程，以備后用。教學(xué)資源作業(yè)內(nèi)容教學(xué)后記備注 課次第次2課時(shí)課型周次第15周授課日期年月日課題圖像瀏覽器教學(xué)目標(biāo)知識(shí)目標(biāo)圖像框技能目標(biāo)熟悉圖像框的常見屬性、方法和事件。素質(zhì)〔情感、態(tài)度、價(jià)值觀、職業(yè)核心能力〕目標(biāo)培養(yǎng)學(xué)生協(xié)作精神、分析問題、解決問題能力重點(diǎn)難點(diǎn)圖像框的常見屬性、方法和事件教學(xué)方法設(shè)計(jì)討論、上機(jī)操作教學(xué)內(nèi)容、教學(xué)過程、及時(shí)間分配導(dǎo)入方法及內(nèi)容導(dǎo)入方法及內(nèi)容要求學(xué)生討論并利用系統(tǒng)提供的Image

控件編寫圖像瀏覽器程序。程序運(yùn)行時(shí)，通過選擇驅(qū)動(dòng)器和文件夾，