成都十八中劉田《VB過程》課件

VB過程成都十八中劉田2.5.2VB過程與函數(shù)

第一課時

打地鼠游戲需要實現(xiàn)哪些功能？打地鼠

打地鼠游戲需要實現(xiàn)哪些功能？擊中得分出現(xiàn)地鼠游戲結(jié)束游戲初始化所有程序代碼連接在一起出現(xiàn)地鼠擊中得分開始計時結(jié)束游戲打地鼠游戲程序模塊化VB過程成都十八中劉田2.5.2VB過程與函數(shù)

第一課時

一、什么是過程？

我們將程序劃分成一個個較小的邏輯單元，每個這樣的邏輯單元可以構(gòu)成一個過程。過程是一段程序代碼，能獨立完成一定的操作和功能。一個完整的VB應(yīng)用程序由若干過程模塊組成。

過程4:擊中計分

一、什么是過程？

過程2:啟動計時器過程1:系統(tǒng)初始化過程5:結(jié)束過程3:隨機出現(xiàn)地鼠

1.分而治之:細化算法，使程序易于調(diào)試

二、為什么使用過程

生活中的排序算法分析：1.輸入4個整數(shù)a,b,c,d2.將a與b比較,并把小者賦給b,大者賦給a3.將a與c比較,并把小者賦給c,大者賦給a4.將a與d比較,并把小者賦給d,大者賦給a5.將b與c比較,并把小者賦給c,大者賦給b6.將b與d比較,并把小者賦給d,大者賦給b7.將c與d比較,并把小者賦給d,大者賦給c編程實現(xiàn)：使任意輸入的4個整數(shù)按從大到小

的順序輸出。

實踐體驗活動一abcd2342134312442

134312432

14123學案“任務(wù)一”：完善流程圖

實踐體驗活動一想一想有沒有功能類似的算法步驟？如何優(yōu)化程序？PrivateSUB

過程名（參數(shù)表）

語句塊ENDSUB

三、過程的定義

注：1.過程名的命名規(guī)則與變量名相同2.括號里的形式參數(shù)表可以缺省Call過程名（參數(shù)表）

三、過程的調(diào)用

a=inputbox(“a=”)b=inputbox(“b=”)c=inputbox(“c=”)ifb>athen

endififc>athen

endififc>bthen

endifPrivatesubExchange(xasinteger,yasinteger)Dimzasintegerz=xx=yy=zendsubcallexchange（a,b)callexchange（a,c)callexchange（b,c)三個數(shù)a,b,c降序排列a=inputbox(“a=”)b=inputbox(“b=”)ifb>athen

endififc>athen

endififc>bthen

endifcallexchange（a,b)callexchange（a,c)callexchange（b,c)a=inputbox(“a=”)b=inputbox(“b=”)ifb>athen

endififc>athen

endififc>bthen

endift=aa=bb=tt=aa=cc=tt=bb=cc=t

二、為什么使用過程

使用過程未使用過程

1.分而治之

細化算法，使程序易于調(diào)試2.代碼重用

使同類操作不重復(fù)編寫，寫一次多次用。

二、為什么使用過程

學案“任務(wù)一”：

實踐體驗活動一

打開“四個數(shù)排序.frm”文件，完善程序。

編程實現(xiàn)：在一定范圍內(nèi)驗證哥德巴赫猜想

實踐體驗活動二算法分析：1.輸入1個大于4的偶數(shù)x編程實現(xiàn)：在一定范圍內(nèi)驗證哥德巴赫猜想：任何一個大于4的偶數(shù)，可以表示為兩個素數(shù)之和

實踐體驗活動二2.令m=33.n=x-m4.檢查m是否是素數(shù)（flag1=true?）5.檢查n是否是素數(shù)（flag2=true?）6.若m,n都是素數(shù),則輸出表達式x=m+n,

否則m=m+2,返回第3步，直到m>x-3時結(jié)束。學案“任務(wù)二”：完善流程圖

實踐體驗活動二想一想有沒有功能類似的算法步驟？如何優(yōu)化程序？學案“任務(wù)二”：

實踐體驗活動二

打開“哥德巴赫猜想.frm”文件，完善程序。

請將打地鼠游戲1.0升級版本2.0，游戲分為初級、中級、高級，用戶可以選擇不同等級體驗游戲。

實踐體驗活動三調(diào)整游戲難易程度，需要考慮哪些因素？分等級打地鼠游戲結(jié)束選擇等級隨機出現(xiàn)地鼠20-24只初級隨機出現(xiàn)地鼠10-14只中級高級隨機出現(xiàn)地鼠5