3FlowControl〔流程控制〕.ppt

3. Flow Control (流程控制) If…Then…else Example (範例) If…then…else 要求使用者輸入 0004: Console.Write(請輸入一個數字：) 0005: number = Console.ReadLine 0006: 判斷 0007: If number 10 Then 0008: digits = 1 0009: ElseIf number 100 Then 0010: digits = 2 0011: ElseIf number 1000 Then 0012: digits = 3 0013: ElseIf number 10000 Then 0014: digits = 4 0015: Else 0016: digits = 5 0017: End If 判斷位數 0019: If digits = 1 Then Result = 1位數 0020: If digits = 2 Then Result = 2位數 0021: If digits = 3 Then Result = 3位數 0022: If digits = 4 Then Result = 4位數 0023: If digits = 5 Then Result = 大於位數 0024: 顯示 0025: Console.Write(數字： number -- Result) Select…Case (條件判斷敘述 ) Select…Case Select …Case Example (範例) Pitfall (陷阱) Nested loop (巢狀迴圈) For … Next For和Next兩個關鍵字中的程式碼，會被重複的執行 執行的次數會依照變數counter來決定 Counter將會從start開始到end，每次遞增 Exit for: 中途離開for迴圈 Example (範例) Nested For loop (巢狀for迴圈) Exit For Do…While 四種 Do … While Example (範例) While … End While While condition [statements] [Exit While] [statements] End While Infinite Loop (無窮迴圈) 無窮迴圈編譯時沒有錯誤訊息 應該確保程式有程式出口 Try…Catch 錯誤處理 Example Sub Main() Dim i As Integer = 10 Try Do While i 9 i = i + 1 Loop Catch ex As Exception Console.WriteLine(程式發生問題: ex.Message) Console.ReadKey() Exit Sub End Try End Sub * * If condition [ Then ] [ statements] [ ElseIf elseifcondition [ Then ] [ else if statements ] ] [ Else [ else statements ] ] End If condition通常是一個布林(Boolean)運算式 一個為零的數值會被視為False，而任何非零數值都被看作 True。 若 condition 為 True，則 Visual Basic 會執行 Then 關鍵字後面的所有指令碼(statements)；反之，則執行Else後面的指令碼(statements)。 0000: Sub Main() 0001: Dim score As Integer = 100 0002: Dim result As String 0003: 0004: Console.Write(分數: score) 0005: 判斷score 有沒有大於 0006: