第8章回圈与讯息视[利息计算程式和猜数字游戏].pptVIP

第8章 迴圈與訊息視窗[利息計算程式和猜數字遊戲] 8-1 For/Next計數迴圈 8-2 訊息視窗與對話方塊 8-3 Do/Loop條件迴圈 8-4 巢狀迴圈 8-5 跳出與繼續迴圈 8-1 For/Next計數迴圈-語法 Visual Basic語言的For/Next迴圈是一種計數迴圈，在迴圈本身的語法就可以自行維護計數器變數，我們只需指定範圍和增量，就可以重複執行固定次數的程式碼，直到到達結束條件。其語法如下所示： For 變數 = 起始值 To 終止值 Step 增量值 程式區塊 Next 變數 ViLLE – 3.1 For/Next迴圈敘述 8-1 For/Next計數迴圈-範例 例如：使用For/Next迴圈來計算1萬元5年複利18%的本利和，如下所示： Dim intI, intYear As Integer Dim dblTotal As Double = 10000 Dim dblRate As Double = 0.18 intYear = 5 For intI = 1 To intYear dblTotal += dblTotal * dblRate Next intI 8-1 For/Next計數迴圈-Visual Basic專案 Visual Basic專案：Ch8-1\利息計算程式 在Windows應用程式使用TextBox控制項輸入本金、利率和年限後，即可使用For/Next迴圈計算到此年限複利的本利和，然後在下方Label控制項顯示本利和。其執行結果如下圖所示： ViLLE – 3.1 For/Next迴圈敘述 請啟動ViLLE，在【三. 迴圈結構】目錄下，選【1. For/Next迴圈敘述】，按【Run】鈕模擬執行此範例程式，如下圖所示： 8-2 訊息與輸入視窗-MsgBox訊息視窗(語法) Visual Basic語言的MsgBox()函數可以顯示訊息視窗，提供使用者錯誤訊息或是非題的選擇。例如：確認操作，函數的語法如下所示： MsgBox(提示訊息, [樣式, 視窗標題]) 上述函數參數的最後2個並非必須參數，可以不用指定。各參數的說明，如下所示： 提示訊息：顯示在訊息視窗的訊息字串，MsgBox()函數至少需要提供此參數。 樣式：指定訊息視窗顯示哪些按鈕、圖示和預設按鈕的樣式，這是MsgBoxStyle列舉常數。 視窗標題：顯示在訊息視窗上方標題列的字串，如果沒有指定，預設就是專案名稱。 8-2 訊息與輸入視窗-MsgBox訊息視窗(範例) 例如：使用MsgBox()函數來顯示計算結果的本利和，如下所示： ret = MsgBox(dblTotal.ToString(C), _ msgStyle, 本利和) 第1個參數是文字方塊的內容，第2個參數msgStyle是顯示樣式的整數值，使用的是列舉常數，如果不只一個，請使用加法來計算樣式值，如下所示： msgStyle = MsgBoxStyle.OKCancel + _ MsgBoxStyle.Information 上述樣式值是顯示「確定」和「取消」鈕和「!」圖示，最後1個參數是訊息視窗的標題文字。 8-2 訊息與輸入視窗-MsgBox訊息視窗(傳回值) MsgBox()函數如果有傳回值，傳回值就是使用者按下的哪一個按鈕，即MsgBoxResult列舉常數，其說明如下表所示： 8-2 訊息與輸入視窗-InputBox輸入視窗(語法) InputBox輸入視窗可以彈出一個視窗來讓使用者輸入資料，在功能上如同文字方塊控制項。InputBox()函數的語法如下所示： InputBox(提示訊息, [標題文字, 預設值, 位置x, 位置y]) 上述函數的最後4個參數並非必須參數，可以不用指定。各參數的說明，如下所示： 提示訊息：顯示在輸入視窗的字串，InputBox()函數至少需要提供此參數。 標題文字：顯示在標題列的文字內容。 預設值：輸入資料的預設值。 位置x、位置y：輸入視窗在螢幕上顯示的位置，沒有指定，預設值是桌面正中央。 8-2 訊息與輸入視窗-InputBox輸入視窗(範例) 例如：使用InputBox()函數來輸入本金的金額，如下所示： strValue = InputBox(請輸入金額?, 輸入金額) 上述程式碼的InputBox()函數只有前2個參數，傳回值是使用者輸入的資料，按下「確定」鈕傳回輸入字串；「取消」鈕傳回空字串。 8-2 訊息與輸入視窗- Visual Basic專案 Visual Basic專案：Ch8-2\利息計算程式 這個Windows應用程式是修改第8-1節的【利息計算程式】，改為使用I