《第四節(jié) 逐幀動(dòng)畫》參考課件

第四節(jié)逐幀動(dòng)畫學(xué)習(xí)目標(biāo)1、理解逐幀動(dòng)畫的原理2、掌握Timer控件和OptionButton控件的運(yùn)用3、掌握分支結(jié)構(gòu)的運(yùn)用

逐幀動(dòng)畫是利用視覺暫留原理，在“連續(xù)的關(guān)鍵幀”中分解動(dòng)畫動(dòng)作，也就是在時(shí)間軸的每幀上逐個(gè)地繪制不同的內(nèi)容，使其連續(xù)播放而成動(dòng)畫。一、逐幀動(dòng)畫1、形態(tài)變化逐幀動(dòng)畫1.gif2.gif2、位置變化讓小兔子向左運(yùn)動(dòng)，可以每間隔一定時(shí)間讓兔子圖片的Left屬性減少。imgrabbit.Left=imgrabbit.Left-200逐幀動(dòng)畫3、速度變化要改變兔子的移動(dòng)速度，我們可以通過改變頻率來實(shí)現(xiàn)。就是讓它在相同的周期內(nèi)多跑幾次，這個(gè)可以通過Timer控件來實(shí)現(xiàn)。逐幀動(dòng)畫Timer控件有兩個(gè)重要的屬性：Interval和Enabled?！綢nterval】屬性是以千分之一秒為單位制定Timer事件之間的間隔。值越大，頻率就越慢?！綞nabled】屬性值為ture時(shí)候才會(huì)觸發(fā)Timer事件，屬性值為false的時(shí)候停止執(zhí)行Timer事件。二、Timer控件三、OptionButton控件OptionButton控件OptionButton控件的圖標(biāo)為，作用是顯示一個(gè)可以打開或者關(guān)閉的選項(xiàng)。我們通常設(shè)置一個(gè)選項(xiàng)組，用OptionButton來顯示選項(xiàng)，每個(gè)選項(xiàng)代表一種選擇，用戶只能選擇其中一項(xiàng)。例如：If條件then語句組1Else語句組2EndIf四、分支結(jié)構(gòu)語句組1語句組2是否條件分支結(jié)構(gòu)載入第一張圖片載入第二張圖片是否a=1a=2a=1代碼分析DimaAsIntegerPrivateSubcmdstop_Click(IndexAsInteger)tmrrun.Enabled=FalseEndSubPrivateSubcmdstart_Click(IndexAsInteger)tmrrun.Enabled=TrueEndSubPrivateSubForm_Load()a=1EndSub代碼分析PrivateSuboptfast_Click(IndexAsInteger)tmrrun.Interval=100EndSubPrivateSuboptmid_Click(IndexAsInteger)tmrrun.Interval=300EndSubPrivateSuboptslow_Click(IndexAsInteger)tmrrun.Interval=500EndSub代碼分析PrivateSubtmrrun_Timer()Ifa=1Thenimgrabbit.Picture=LoadPicture(App.Path&"\pic\1.gif")a=2Elseimgrabbit.Picture=LoadPicture(App.Path&"\pic\2.gif")a=1EndIfimgrabbit.Left=imgrabbit.Left-200Ifimgrabbit.Left<0Thenimgrabbit.Left=Form1.WidthEndIfEndSub制作一個(gè)如下圖的”奔跑吧！兔子”程序。五、課堂任務(wù)圖片素材六、課堂小結(jié)1、Timer控件有兩個(gè)重要的屬性，Interval屬性控制快慢，Enabled屬性決定是否觸發(fā)T