vb定時(shí)器

1、1課題課題：定時(shí)器循環(huán)定時(shí)器循環(huán)教學(xué)要求教學(xué)要求：了解VB中的定時(shí)器，并會(huì)利用定時(shí)器實(shí)現(xiàn)循環(huán)結(jié)構(gòu)。教學(xué)重點(diǎn)與難點(diǎn)教學(xué)重點(diǎn)與難點(diǎn)：定時(shí)器的兩個(gè)重要屬性教學(xué)方法教學(xué)方法：教師操作演示，學(xué)生觀察總結(jié)。任務(wù)驅(qū)動(dòng)、啟發(fā)式教學(xué)、邊講解邊操作。教學(xué)過(guò)程教學(xué)過(guò)程：【新課導(dǎo)入新課導(dǎo)入】電腦的屏幕保護(hù)程序。運(yùn)行桌面上的幾個(gè)小例子后，大家有沒(méi)有發(fā)現(xiàn)有一個(gè)共同的特征？【新課教學(xué)新課教學(xué)】VB的工具箱中有一個(gè)定時(shí)器定時(shí)器控件可以幫助我們實(shí)現(xiàn)這種循環(huán)。定時(shí)器循環(huán)定

2、時(shí)器循環(huán)PPT首先，在定時(shí)器對(duì)象中存放需要重復(fù)執(zhí)行的程序，定時(shí)器工作時(shí)，每經(jīng)過(guò)一定時(shí)間間隔就觸發(fā)存放在定時(shí)器對(duì)象中的程序而形成循環(huán)。定時(shí)器的兩個(gè)重要屬性是“EnabledEnabled”和“IntervalInterval”。當(dāng)“Enabled”的屬性為“True”時(shí)，定時(shí)器開(kāi)始工作；屬性為“False”時(shí)，定時(shí)器停止工作?！癐nterval”屬性決定了定時(shí)器對(duì)象中程序的時(shí)間間隔，，它的取值范圍為0~65535（單位：毫秒）。一、一、“

3、倒計(jì)時(shí)倒計(jì)時(shí)”程序程序（1）程序功能）程序功能運(yùn)行“倒計(jì)時(shí)”程序。在文本框中輸入開(kāi)始倒計(jì)時(shí)的秒值，再單擊“開(kāi)始”按鈕，開(kāi)始倒計(jì)時(shí)。下面，我們就利用定時(shí)器來(lái)完成這個(gè)“倒計(jì)時(shí)”程序。（把教材翻到39頁(yè)，圖3.37，定時(shí)器的界面）（2）分析界面和原理）分析界面和原理程序界面上有哪些對(duì)象？有一個(gè)文本框（TextBox）用來(lái)輸入要倒計(jì)時(shí)的秒數(shù)、一個(gè)標(biāo)簽（Label）顯示單位，兩個(gè)按鈕（CommButton）用來(lái)開(kāi)始倒計(jì)時(shí)和結(jié)束整個(gè)程序。這個(gè)程序的

4、主角是誰(shuí)呢？定時(shí)器（Timer）（下面我們就要讓這個(gè)主角上場(chǎng)了）（打開(kāi)半成品）向窗體中添加一個(gè)定時(shí)器對(duì)象“Timer1”（在工具箱的哪里可以找到？忘記的話可以看書(shū)本39頁(yè)）。先將定時(shí)器處于關(guān)閉狀態(tài)，檢查“Enabled”屬性是否為False”。（還有一個(gè)屬性是什么？時(shí)間間隔）將“Timer1”的“Interval”屬性設(shè)置為“1000”（什么意思？）單擊“開(kāi)始”按鈕，就將文本框中的值存入變量i，再將定時(shí)器對(duì)象“Timer1”的“Enab

5、led”屬性設(shè)置為“True”，定時(shí)器開(kāi)始工作。定時(shí)器每隔1秒，就使變量i中的值減少1，可以用什么表達(dá)式來(lái)表示數(shù)字的逐一遞減？（i=i1）。也就是定時(shí)器每隔1秒，執(zhí)行一次i=i1。并將變量i中的值顯示在文本框中，怎么表示？（Text1.Text=i）。當(dāng)變量i中的值減到0時(shí)，將對(duì)象“Timer1”的“Enabled”屬性設(shè)置為“False”，定時(shí)器停止工作。（2）程序源碼）程序源碼DimiAsInteger定義一個(gè)存放倒計(jì)時(shí)開(kāi)始秒數(shù)的整

6、型變量定義一個(gè)存放倒計(jì)時(shí)開(kāi)始秒數(shù)的整型變量PrivateSubComm1_Click()i=Text1.Text將文本框?qū)ο笾休斎氲拿胫蒂x給變量iTimer1.Enabled=True使定時(shí)器開(kāi)始工作EndSubRem定時(shí)器對(duì)象中的程序段PrivateSubTimer1_Timer()i=i1秒數(shù)遞減Text1.Text=i將遞減后的數(shù)值顯示在文本框中（如果不打以下語(yǔ)句會(huì)怎樣？用倒計(jì)時(shí)3秒演示）Ifi=0ThenTimer1.Enabl

7、ed=False當(dāng)秒值遞減到0時(shí)，關(guān)閉定時(shí)器，結(jié)束循環(huán)。2EndSubPrivateSubComm2_Click()EndEndSub學(xué)生練習(xí)：學(xué)生練習(xí)：下發(fā)“倒計(jì)時(shí)半成品”，學(xué)生完成。PPT（倒計(jì)時(shí)程序的關(guān)鍵點(diǎn)）。程序做完了，大家對(duì)定時(shí)器有了一定的認(rèn)識(shí)了吧。像這種每隔一段時(shí)間需要自動(dòng)運(yùn)行的并且重復(fù)執(zhí)行的程序段，我們可以把它們放進(jìn)定時(shí)器，讓定時(shí)器來(lái)幫我們掌握時(shí)間、控制循環(huán)。下面我們?cè)賮?lái)另外一個(gè)例子。二、二、“動(dòng)畫(huà)動(dòng)畫(huà)”程序程序運(yùn)行“動(dòng)畫(huà)

8、”程序。思考以下問(wèn)題：明明給了30張靜止的圖片，為什么單擊“開(kāi)始”按鈕里面的人就會(huì)動(dòng)起來(lái)呢？（每隔0.2秒切換一張圖片，利用人眼的“視覺(jué)暫留”原理，形成連續(xù)的動(dòng)態(tài)效果）誰(shuí)來(lái)控制這0.2秒的時(shí)間間隔呢？（定時(shí)器）準(zhǔn)備知識(shí)：Image1.Picture=LoadPicture(“tiger.jpg“)Image1.Picture=LoadPicture(x&“.jpg“)將序號(hào)為x的圖形送入Image對(duì)象Timer1中的循環(huán)體：x=x1If

9、x30Thenx=1Image1.Picture=LoadPicture(x&“.jpg“)打開(kāi)“動(dòng)畫(huà)”程序工程，分析界面和代碼。其中Image1好像凹進(jìn)去的，這種邊緣樣式在哪里設(shè)置？（教材翻到41頁(yè)BderStyle設(shè)置屬性值為1）做好程序后，有些同學(xué)會(huì)發(fā)現(xiàn)提示“未找到1.jpg”這是為什么？（必須把所有圖片放在與工程的相同目錄下）最后提醒大家，千萬(wàn)別忘記設(shè)置定時(shí)器的“Interval”屬性（時(shí)間間隔）。好了，給大家30張圖片你可以編

10、寫(xiě)一個(gè)“動(dòng)畫(huà)”程序了，那如果我給你110張圖片你也會(huì)利用定時(shí)器讓動(dòng)畫(huà)動(dòng)起來(lái)嗎？需要在程序的哪里修改一下呢？“一周表情”exe文件。學(xué)生練習(xí)：學(xué)生練習(xí)：下發(fā)“一周表情半成品”，參考教材P.40“動(dòng)畫(huà)”程序，完成“一周表情”程序。點(diǎn)評(píng)作業(yè)點(diǎn)評(píng)作業(yè)【小結(jié)小結(jié)】本節(jié)課了解了VB中的定時(shí)器，并會(huì)利用定時(shí)器實(shí)現(xiàn)循環(huán)結(jié)構(gòu)。在定時(shí)器對(duì)象中存放需要重復(fù)執(zhí)行的程序，定時(shí)器工作時(shí)，每經(jīng)過(guò)一定時(shí)間間隔就觸發(fā)存放在定時(shí)器對(duì)象中的程序而形成循環(huán)。定時(shí)器的兩個(gè)重要屬