資源簡介

(共25張PPT)
第十二課分支結構——公交車收費系統
問題與任務：
小明想用VB編程模擬公交車收費系統，如圖12-1所示，要求如下。
(1)每收費2元，可通過刷卡或投幣付款。
(2)若刷卡成功則顯示卡中余額，否則提示卡中余額不足并顯示卡中剩余金額。
(3)若投幣超過2元不設找贖，否則提示投入足夠金額。
一、分析公交車收費系統原理
1.公交車收費系統功能分析
公交車收費有刷卡和投幣兩種方式。刷卡收費時，如果卡中余額超過2元，就從卡中扣除本次車費并顯示卡中余額否則提示刷卡失敗并顯示卡中余額。
試一試
用“如果……就……，否則……”描述公交車的投幣收費功能。
2.刷卡收費原理分析
若用
Banlance表示卡中余額，則每扣一次費，就執行一次
Banlance-2的操作，并將相應結果保存在
Banlance中。對應的賦值語句就是:
Banlance=
Banlance-2。
練一練
設計計數器。請依照圖12-2新建一個工程，添加一個
Command控件(
caption屬性值為0)。要求:每單擊一次按鈕，按鈕的顯示數字就加1。
二、設計公交車收費系統算法
1.分支結構
要讓程序根據不同的情況執行不同的任務時，需要用到分支結構。VB中通常使用的分支結構是If語句，其格式為：
If條件Then
語句組1
[Else
語句組2]
End
If
該語句的意思就是:如果條件成立，則執行語句組1;否則執行語句組2。對應的流程圖如圖12-3所示。
注意:(1)條件表達式中經常會用到比較運算，常用的比較運算符如下。
(2)復雜的條件需要用多個表達式才能表達。例如，0＜x＜2就要用x＞0
And
x＜2表示。
2.收費系統算法流程圖
根據前面的原理分析，刷卡收費對應的算法流程圖如“圖12-4刷卡收費算法流程圖”所示。
練一練
請在框中畫出投幣收費的算法流程圖。
三、
MsgBox函數
VB不僅可以通過
Label控件，還可以通過
Msg
Box函數來顯示結果。
該函數語法為:
MsgBox(字符串)。其作用是彈出一個對話框，對話框中的內容就是字符串。
四、Val函數
試一試
(1)依照圖12-5所示新建一個工程，添加兩個Tex控件和一個
Command控件，并在
Command控件的
Click事件中輸入下面的代碼。
(2)在兩個Text控件中，分別輸入兩組數據“11，12”“10，2”，點擊比較，觀察程序結果，思考原因是什么。
由于Text控件的Text屬性值、
Label等控件的
Caption屬性值都是字符類型，因此，它們的比較是從第一個字符開始，順次向后直到出現不同的字符為止，然后以第一個不同的字符序號來確定。例如，“11”＜“12”，“10”＜“2”。
為了保證比較的結果符合數學規律，我們就必須通過Val函數將字符型數據轉換為數值型數據，其語法格式為:Val(字符串）。
例如，Val(“12”)的結果就是整數12。
五、設計和調試公交車收費系統的程序
根據前面的原理分析和對應算法流程圖，完整的公交車收費系統程序如圖12-6所示。
小技巧
為了給乘客一個友好的提示，程序中使用了字符串運算符“＆”，該運算符用于將兩個表達式作為字符串連接。例如，刷卡前卡內余額為10元，第一次刷卡收費后，顯示內容就是“卡中還余8元”。
試一試
利用所學的逐語句調試和變量監視，觀察不同情況下程序的執行過程。
討
論
程序中用變量
payment表示每次扣費金額，這樣做的好處是什么?
思考與練習
小明準備為班級開發一個投票系統，如“圖12-7
投票系統”所示，要求如下。
(1)點擊“投票支持”按鈕，對應的票數加1。
(2)當全班的51名同學投票完畢之后，統計出投票結果。
拓展：在學校運動會上,李小白和杜小甫同學在爭奪跳高比賽的冠軍獎杯。現在需要利用VB程序,根據他們各自的跳高記錄，,
對他們的成績做一個排名,
分出冠軍和亞軍。編程任務落在了你的肩上。假設:李小白跳高160cm，杜小甫跳高163cm,則,杜小甫冠軍,李小白亞軍。兩位選手的成績由電腦輸入。我們假設用戶所輸入的都是合法的整數。(包含程序運行界面的VB工程已經發送到學員的桌面。現在需要你對“裁判”按鈕進行編程,完善程序的邏輯。)
課堂小結
這節課，我們知道了If語句的格式和執行過程，掌握了
MsgBox函數、Val函數的格式和作用，還有変量的概念、命名規則和定義方法等知識。學會了設計和調試公交車收費系統的程序。
板書設計
分析公交車收費系統原理
設計公交車收費系統算法
MsgBox函數
Val函數
設計和調試公交車收費系統的程序
分支結構--公
交車收費系統第十二課
分支結構-----公交車收費系統
教學目標
（一）知識與技能
1
If語句的格式和執行過程。
2
MsgBox函數、Val函數的格式和作用。
3変量的概念、命名規則和定義方法。
（二）過程與方法
通過自主討論、合作探究,提高自我學習的能力。
（三）情感態度價值觀
通過實例體驗分支結構的流程,提升用編程思想高效解決生活中實際問題的能力,增強對編程的興趣。
教學重難點
1、設計公交車收費系統算法
2、MsgBox函數、Val函數的格式和作用
3、設計和調試公交車收費系統的程序
教學過程
問題與任務導入：
小明想用VB編程模擬公交車收費系統，如圖12-1所示，要求如下。
(1)每收費2元，可通過刷卡或投幣付款。
(2)若刷卡成功則顯示卡中余額，否則提示卡中余額不足并顯示卡中剩余金額。
(3)若投幣超過2元不設找贖，否則提示投入足夠金額。
圖12-1公交車收費系統
一、分析公交車收費系統原理
1.公交車收費系統功能分析
從任務描述中我們知道，公交車收費有刷卡和投幣兩種方式。刷卡收費時，如果卡中余額超過2元，就從卡中扣除本次車費并顯示卡中余額否則提示刷卡失敗并顯示卡中余額。
試一試
用“如果……就……，否則……”描述公交車的投幣收費功能。
2.刷卡收費原理分析
若用
Banlance表示卡中余額，則每扣一次費，就執行一次
Banlance-2的操作，并將相應結果保存在
Banlance中。對應的賦值語句就是:
Banlance=
Banlance-2。
練一練
設計計數器。請依照圖12-2新建一個工程，添加一個
Command控件(
caption屬性值為0)。要求:每單擊一次按鈕，按鈕的顯示數字就加1。
圖12-2計數器界面
二、設計公交車收費系統算法
1.分支結構
要讓程序根據不同的情況執行不同的任務時，需要用到分支結構。VB中通常使用的分支結構是If語句，其格式為：
If條件Then
語句組1
[Else
語句組2]
End
If
該語句的意思就是:如果條件成立，則執行語句組1;否則執行語句組2。對應的流程圖如圖12-3所示。
注意:(1)條件表達式中經常會用到比較運算，常用的比較運算符如下。
(2)復雜的條件需要用多個表達式才能表達。例如，0＜x＜2就要用x＞0
And
x＜2表示。
2.收費系統算法流程圖
根據前面的原理分析，刷卡收費對應的算法流程圖如“圖12-4刷卡收費算法流程圖”所示。
練一練
請在框中畫出投幣收費的算法流程圖。
三、
MsgBox函數
VB不僅可以通過
Label控件，還可以通過
Msg
Box函數來顯示結果。該函數語法為:
Msg
Box(字符串)。其作用是彈出一個對話框，對話框中的內容就是字符串。
四、Val函數
試一試
(1)依照圖12-5所示新建一個工程，添加兩個Tex控件和一個
Command控件，并在
Command控件的
Click事件中輸入下面的代碼。
(a)Val函數
(b)Cick事件中的代碼
(2)在兩個Text控件中，分別輸入兩組數據“11，12”“10，2”，點擊比較，觀察程序結果，思考原因是什么。
由于Text控件的Text屬性值、
Label等控件的
Caption屬性值都是字符類型，因此，它們的比較是從第一個字符開始，順次向后直到出現不同的字符為止，然后以第一個不同的字符序號來確定。例如，“11”＜“12，“10”＜“2”。為了保證比較的結果符合數學規律，我們就必須通過Val函數將字符型數據轉換為數值型數據，其語法格式為:Val(字符串）。例如，Val(“12”)的結果就是整數12。
五、設計和調試公交車收費系統的程序
根據前面的原理分析和對應算法流程圖，完整的公交車收費系統程序如圖12-6所示。小技巧
為了給乘客一個友好的提示，程序中使用了字符串運算符“＆”，該運算符用于將兩個表達式作為字符串連接。例如，刷卡前卡內余額為10元，第一次刷卡收費后，顯示內容就是“卡中還余8元”。
圖12-6公交車收費系統程序
試一試
利用所學的逐語句調試和變量監視，觀察不同情況下程序的執行過程。
討
論
程序中用變量
payment表示每次扣費金額，這樣做的好處是什么?
思考與練習
小明準備為班級開發一個投票系統，如“圖12-7
投票系統”所示，要求如下。
(1)點擊“投票支持”按鈕，對應的票數加1。
(2)當全班的51名同學投票完畢之后，統計出投票結果。
拓展
在學校運動會上,李小白和杜小甫同學在爭奪跳高比賽的冠軍獎杯。現在需要利用VB程序,根據他們各自的跳高記錄，,
對他們的成績做一個排名,
分出冠軍和亞軍。編程任務落在了你的肩上。假設:李小白跳高160cm，杜小甫跳高163cm,則,杜小甫冠軍,李小白亞軍。兩位選手的成績由電腦輸入。我們假設用戶所輸入的都是合法的整數。(包含程序運行界面的VB工程已經發送到學員的桌面。現在需要你對“裁判”按鈕進行編程,完善程序的邏輯。)
學生觀看視頻講解。
課堂小結
這節課，我們知道了If語句的格式和執行過程，掌握了
MsgBox函數、Val函數的格式和作用，還有変量的概念、命名規則和定義方法等知識。學會了設計和調試公交車收費系統的程序。
板書設計
分析公交車收費系統原理
設計公交車收費系統算法
分支結構----公交車收費系統
MsgBox函數
Val函數
設計和調試公交車收費系統的程序
課后反思

展開更多......

收起↑