My visual basic入門指引 3

VB 流程控制學習目標 : 1. 學會使用各種條件判斷 2. 學會使用各種迴圈控制

If...else 進階使用在 If...else 中間的程式區塊中 , 再包含另一組 If...else 問題 : 如果小明國文成績大於 60 分時 , 則顯示及格 , 且如果小明的成績又大於 80 分時 , 則顯示優等 .. 但如果成績小於 60 分 , 則顯示不及格 If 小明國文成績 > 60 then If 小明國文成績 > 80 then Msgbox “ 優等” Else Msgbox “ 及格” End if Else Msgbox “ 不及格” End if 此種方式稱為 : 巢狀 If 敍述

If...elseif 進階使用問題 : 如果小明國文成績大於 60 分時 , 則顯示 D 等 , 如果小明的成績大於 70 分時 , 則顯示 C 等 , 如果成績大於 80 分時 , 則顯示 B 等 , 如果成績大於 90 分時 , 則顯示 A 等 , 但如果成績小於 60 分 , 則顯示 E 等 If 成績 > 60 then If 成績 > 70 then If 成績 > 80 then If 成績 > 90 then Msgbox “A 等” else Msgbox “B 等” End if Else Msgbox “C 等” End if Else Msgbox “D 等” End if Else Msgbox “E 等” End if

If...elseif 語法如下 If 第一條件式成立 then ... Elseif 第二條件式成立 then ... Elseif 第三條件式成立 then ... Else ... End if 程式改寫如下 If 成績 > 90 then Msgbox “A 等” elseIf 成績 > 80 then Msgbox “B 等” elseIf 成績 > 70 then Msgbox “C 等” Elseif 成績 > 60 then Msgbox “D 等” Else Msgbox “E 等” End if

Select-Case Select-Case 通常用在條件值有三個以上的判斷時使用使用語法 -1: Select Case 變數 Case 變數值 1 : 陳述式 1 Case 變數值 2: 陳述式 2 Case 變數值 3: 陳述式 3 Case else: 以上變數值都不符合時的陳述式 End Select 以單一變數值來做判斷

Select-Case 使用語法 -2: Select Case 變數 Case Is > 變數值 1 : 陳述式 1 Case Is > 變數值 2: 陳述式 2 Case Is > 變數值 3: 陳述式 3 Case else: 以上變數值都不符合時的陳述式 End Select Is 代表變數

Select-Case 使用語法 -3: Select Case 變數 Case 變數值 1 to 變數值 2 : 陳述式 1 Case 變數值 3 to 變數值 4 : 陳述式 2 Case 變數值 5 to 變數值 6 : 陳述式 3 Case else: 以上變數值都不符合時的陳述式 End Select 以變數值範圍來做判斷

迴圈控制使用時機 : 當需要重覆執行某一段陳述式時使用例如 : 宣告一個變數 , 用來儲存從 1 加到 10 的結果 Dim Sum as Integer Sum=1+2+3+4+5+...+9+10 For...Next 迴圈語法 For 計數變數 = 起始值 to 終點值 [Step 數值 ] 陳述式 Next For I = 1 to 10 Sum = Sum + I Next [Step 數值 ] 表示計數變數每次要增加的值

巢狀迴圈在迴圈內還有其它迴圈例如 : 將九九乘法的所有計算值加總 For i=1 to 10 For j=1 to 10 Sum = Sum + i * j Next Next

未知執行次數的迴圈使用時機 : 當需要重覆執行某一段陳述式時 , 但不知道總共要執行幾次時使用迴圈終止條件由陳述式來控制語法 : Do While 條件判斷式成立時陳述式 Loop 例如 : 希望知道從 1 加到 100 的過程中 , 到哪一個數值 , 其總合會加於 100 Dim Sum as Integer Dim I as Integer Do While Sum < 100 Sum = Sum + I i=i+1 Loop

My visual basic入門指引 3

More Related Content

Viewers also liked (9)

My visual basic入門指引 3