資源簡(jiǎn)介

(共13張PPT)
2.6
節(jié)日彩燈
——致敬抗疫英雄電子海報(bào)
制作一個(gè)電子海報(bào)
1.海報(bào)包含什么元素？
2.海報(bào)實(shí)現(xiàn)什么效果？
分析
圖片和彩燈
彩燈顏色變換
圖片切換
01
1.
窗體Form的圖片加載通過(guò)（
）屬性設(shè)置。
2.彩燈用（
）控件,,因10盞彩燈都是同類(lèi)控件，可以建立（
）
3.彩燈顏色在一定時(shí)間內(nèi)進(jìn)行變換，用（
）控件，間隔時(shí)間通過(guò)（
）屬性值控制
Picture
控件數(shù)組
shape
Timer
Interval
海報(bào)界面的設(shè)計(jì)
序號(hào)
使用的控件
屬性
屬性值
說(shuō)明
1
Form1窗體
Name
電子海報(bào)的顯示屏
Caption
Picture
2
Shape1數(shù)組
Name
彩燈
(先添加第一盞彩燈，再采用控件數(shù)組批量添加)
BackStyle（背景樣式）
BorderStyle（邊框樣式）
FillStyle（填充方式）
Shape
3
Timer1
Name
周期性重復(fù)執(zhí)行彩燈的變色
Interval
Form1
歡迎英雄歸來(lái)
圖片路徑
Shape1
3—Circle（圓形）
Timer1
海報(bào)的對(duì)象、屬性分析表
1—Opaque（不透明的）
1—transparent（透明的）
500-2000
任務(wù)1
打開(kāi)VB，設(shè)計(jì)好電子海報(bào)界面，并設(shè)置對(duì)象的相關(guān)屬性。
0—transparent（透明的）
如何實(shí)現(xiàn)彩燈顏色的變換？
紅色（R)
Red
綠色（G)
Green
藍(lán)色（B)
Blue
計(jì)算機(jī)中的顏色
在VB中使用RGB顏色函數(shù)來(lái)實(shí)現(xiàn)顏色的設(shè)置。
每種顏色的取值范圍都為0-255
例如：紅色的RGB(255,0,0)
格式為：RGB(紅色值,綠色值,藍(lán)色值)
02
R
G
B
把RGB里的顏色值設(shè)為0-255范圍內(nèi)的隨機(jī)整數(shù)
結(jié)合Rnd和Int函數(shù)產(chǎn)生隨機(jī)整數(shù)
Shape1.BackColor=RGB(Int(Rnd
256),
Int(Rnd
256),
Int(Rnd
256))
產(chǎn)生一個(gè)在0-256范圍內(nèi)的小數(shù)
取括號(hào)中小數(shù)的整數(shù)部分
紅色值，綠色值，藍(lán)色值
產(chǎn)生顏色變換
隨機(jī)函數(shù)
取整函數(shù)
通過(guò)上面的學(xué)習(xí)，我們可以知道，使用以下代碼能實(shí)現(xiàn)第一盞彩燈的顏色變換
電子海報(bào)中，有10盞燈，同樣的代碼我們至少重復(fù)寫(xiě)10遍；20盞，需要重復(fù)寫(xiě)20遍，這樣程序就很煩瑣了。
03
循環(huán)變量=初值
循環(huán)變量超過(guò)終值
語(yǔ)句組
循環(huán)變量增加一個(gè)步長(zhǎng)
在VB語(yǔ)言中，有一個(gè)專(zhuān)門(mén)用于描述重復(fù)工作的語(yǔ)句——For循環(huán)語(yǔ)句，它能夠幫助我們很方便地執(zhí)行重復(fù)的工作，使程序變得短小精悍。
格式：
For循環(huán)變量=初值
to
終值
step
步長(zhǎng)值
語(yǔ)句組
Next
其中循環(huán)變量為數(shù)值型變量，初值、終值、步長(zhǎng)值均為數(shù)值。步長(zhǎng)值為循環(huán)變量每次的增量，可以為負(fù)數(shù)。
FOR循環(huán)語(yǔ)句
是
否
04
i=0
i>10
隨機(jī)設(shè)置第i盞燈的顏色
i=i+1
用循環(huán)結(jié)構(gòu)優(yōu)化彩燈控制
是
否
定義彩燈數(shù)組的索引號(hào)為i
初值：i=0
終值：10
step（增量）為1
格式：
For循環(huán)變量=初值
to
終值
step
步長(zhǎng)值
語(yǔ)句組
Next
其中循環(huán)變量為數(shù)值型變量，初值、終值、步長(zhǎng)值均為數(shù)值。步長(zhǎng)值為循環(huán)變量每次的增量，可以為負(fù)數(shù)。
05
j=0,
j=j+1
j>3
載入圖片
將j改為0
拓展任務(wù)：實(shí)現(xiàn)Form1.Picture循環(huán)變換
定義圖片名稱(chēng)為j
分析：圖片的周期性循環(huán)變換，
可以添加Timer控件
是
否
05
拓展任務(wù)：實(shí)現(xiàn)Form1.Picture循環(huán)變換
文件名，其中app.path返回工程所在的路徑
App.Path
&
"\pic\"
&
1&
".jpg"
Shape
控件數(shù)組
Timer控件
For循環(huán)語(yǔ)句
在VB中添加彩燈，可以使用（
）控件
添加同類(lèi)控件，可以使用（
）批量添加
周期性重復(fù)某個(gè)事件可以使用（
）控件
實(shí)現(xiàn)某段代碼重復(fù)執(zhí)行可以使用（
）語(yǔ)句
06
小結(jié)
謝謝您的觀看Dim
i
As
Integer
Dim
j
As
Integer
Private
Sub
Timer1_Timer()
For
i
=
0
To
10
Step
1
Shape1(i).BackColor
=
RGB(Int(Rnd
256),
Int(Rnd
256),
Int(Rnd
256))
Next
i
End
Sub
Private
Sub
Timer2_Timer()
j
=
j
+
1
If
j
>
3
Then
j
=
0
Else
form1.Picture
=
LoadPicture(App.Path
&
"\pic\"
&
j
&
".jpg")
End
If
End
Sub《節(jié)日彩燈》教學(xué)設(shè)計(jì)
教學(xué)內(nèi)容分析
《節(jié)日彩燈》是八年級(jí)下冊(cè)第二章第六節(jié)的教學(xué)內(nèi)容，本節(jié)課在一定意義上是一節(jié)綜合運(yùn)用課，需要用到前面幾節(jié)課學(xué)到的較多內(nèi)容，如timer控件，隨機(jī)函數(shù)Rnd、取整函數(shù)Int，趣味性較強(qiáng)。
學(xué)習(xí)者分析
本節(jié)課的學(xué)習(xí)對(duì)象是初二學(xué)生，80%以上的同學(xué)初次接觸VB程序設(shè)計(jì)，程序設(shè)計(jì)基礎(chǔ)水平較薄弱。加上處于新冠特殊時(shí)期，網(wǎng)絡(luò)學(xué)期的特殊性，使老師沒(méi)法真實(shí)了解到學(xué)生的學(xué)習(xí)情況。部分學(xué)生特別認(rèn)真，但還是有部分同學(xué)不予重視，學(xué)習(xí)效果保留空間。
教學(xué)目標(biāo)
知識(shí)與技能
學(xué)會(huì)只用shape控件和設(shè)置其屬性。
理解控件數(shù)組的概念
了解RGB函數(shù)語(yǔ)句的格式與使用
鞏固Int取整函數(shù)、Rnd隨機(jī)函數(shù)和Timer控件的使用。
感受在程序中for循環(huán)語(yǔ)句的重要地位。
過(guò)程與方法
感受電子海報(bào)界面的設(shè)計(jì)分析，熟悉控件以及與其關(guān)聯(lián)的屬性的使用，積累控件屬性的設(shè)置技巧；
通過(guò)案例拓展，學(xué)會(huì)知識(shí)的遷移。
情感態(tài)度與價(jià)值觀
養(yǎng)成用計(jì)算思維解決問(wèn)題的習(xí)慣，感受計(jì)算機(jī)程序的魅力；
建立利用程序設(shè)計(jì)解決實(shí)際問(wèn)題的生活觀念。
向白衣勇士致敬，學(xué)會(huì)敬畏生命；
教學(xué)重點(diǎn)難點(diǎn)
教學(xué)重點(diǎn)：shape控件
RGB函數(shù)
for循環(huán)語(yǔ)句
教學(xué)難點(diǎn)：RGB函數(shù)的使用
for循環(huán)語(yǔ)句
教學(xué)策略
以學(xué)生為主體，通過(guò)線(xiàn)上直播和微課進(jìn)行學(xué)習(xí)，從中發(fā)現(xiàn)問(wèn)題，思考并解決問(wèn)題的過(guò)程。
教學(xué)準(zhǔn)備
微課，PPT，程序，教學(xué)設(shè)計(jì)，練習(xí)，練習(xí)答疑，網(wǎng)絡(luò)教學(xué)平臺(tái)
教學(xué)過(guò)程
教學(xué)環(huán)節(jié)
教師活動(dòng)
學(xué)生活動(dòng)
設(shè)計(jì)意圖
情景創(chuàng)設(shè)
引入新課
播放視頻，弘揚(yáng)愛(ài)國(guó)主義精神
觀看新聞
引起共鳴
激發(fā)學(xué)習(xí)
興趣
教學(xué)過(guò)程
教學(xué)過(guò)程
界面設(shè)計(jì)：
通過(guò)照片，思考需要的控件有哪些？控件的屬性應(yīng)該怎樣設(shè)置？
思考電子海報(bào)包含元素，回答老師問(wèn)題
查看軟件中的工具箱，查找需要的控件
參與程序?qū)ο蟆⒖丶⑹录砀竦臍w納
培養(yǎng)學(xué)生運(yùn)用計(jì)算機(jī)解決問(wèn)題的思維
任務(wù)1:
完成電子海報(bào)的界面制作
發(fā)送微課，并巡視輔導(dǎo)學(xué)生完成任務(wù)
觀看微課，制作電子表格的界面設(shè)計(jì)
思考問(wèn)題：如何實(shí)現(xiàn)彩燈顏色的變換
培養(yǎng)學(xué)生自主學(xué)習(xí)的能力
鞏固實(shí)操技能
使用RGB函數(shù)實(shí)現(xiàn)彩燈顏色的變化
思考
觀看
完成任務(wù)
了解RGB函數(shù)的使用
結(jié)合For循環(huán)語(yǔ)句實(shí)現(xiàn)彩燈顏色的變化
在VB語(yǔ)言中，有一個(gè)專(zhuān)門(mén)用于描述重復(fù)工作的語(yǔ)句——For循環(huán)語(yǔ)句
格式：
For循環(huán)變量=初值
to
終值
step
步長(zhǎng)值
語(yǔ)句組
Next
其中循環(huán)變量為數(shù)值型變量，初值、終值、步長(zhǎng)值均為數(shù)值。步長(zhǎng)值為循環(huán)變量每次的增量，可以為負(fù)數(shù)。
觀看理解
編輯程序?qū)崿F(xiàn)效果
掌握f(shuō)or循環(huán)語(yǔ)句的使用
拓展任務(wù)：實(shí)現(xiàn)Form1.Picture循環(huán)變換
結(jié)合Timer控件和IF條件語(yǔ)句完成。
討論交流
培養(yǎng)學(xué)生的合作一時(shí)
小結(jié)
鞏固練習(xí)
完成練習(xí)
鞏固知識(shí)

展開(kāi)更多......

收起↑