回圈实例演练

1、迴圈實例演練實例演練1：猜數字。讓使用者輸入130的任意整數，並顯示結果，直到使用者猜對數字為止。（使用Do WhileLoop）執行畫面：假設預設數字為19實例演練1解說1. 首先是選取適當的控制元件：本表單共使用了三種控制元件，他們分別來自工具箱的標籤控制元件、命令鈕控制元件、文字方塊控制元件。2. 接下來是物件屬性的設定：物件屬性屬性值Label1Caption輸入130的整數Cmd_InputCaption輸入Cmd_EndCaption離開Text1TextMsgboxPrompt3. 雙按Cmd_Input控制元件，在程式方塊中輸入程式，如下圖：實例演練2：你的朋友開了一間花店，請

2、你幫他寫一個可以計算花價和輸出花語的程式。l 9，99，999 花語：天長地久 花價再打九折喔！l 3 花語：我愛你 520l 101 花語：妳是我的唯一 花價可以便宜 100 元 喔！l 10 19 花語：妳是我的最愛l 其他 花語：就是喜歡妳啦！花價計算方式：每朵花20元，包裝費 50元參考答案 請下載 Select002.exe（本題要求必須使用 Select Case語法）執行畫面： 圖 1-1圖 1-2圖 2-2圖 2-1 圖 3-2圖 3-1實例演練2解說1. 首先是選取適當的控制元件：本表單只使用了一種控制元件，命令鈕控制元件。2. 雙按Command1控制元件，在Command

3、1_Click程式方塊中輸入程式，如下圖：3. 接下來執行程式。實例演練3：有VB書共出兩個版本，精裝版每本 450元，一般版每本 400元，購買時折扣方式如下：l 1 10本 不打折扣l 11 20本 打95折l 21 30本 打9折l 31 40本 打85折l 41 50本 打8折l 50本以上 打7折選擇購買的版本種類與購買本數，然後計算出總價。參考答案 請下載 Select003.exe執行畫面：圖 一圖 二本題需用到的兩個控制元件：架框（Frame）、選擇鈕（Option Button）有群組概念的架框 （Frame） 架框（Frame）的功用是把數個控制元件框起來，構成控制元件群組

4、，例如下圖：兩個選擇鈕小圓圈裡的黑點表示這個選項被選擇了。這個架框將兩個選擇鈕框起來構成一個群組。在表單設計中，如果把性質相似的控制元件框起，可以予以清晰且容易操作的感覺。使用架框 （Frame）在表單上佈置架框，與佈置其他控制元件的方法並沒有什麼不同，但如何把其他控制元件框在架框裡面，則要注意置控制元件的程序，假設我們要完成上圖的佈置，請跟著以下步驟進行：(1)先佈置架框（工具箱的 ），並將架框拉至適當的大小。以拉曳方式佈置選擇鈕選取選擇鈕後，移動滑鼠到架框裡面。(2)選取工具箱的選擇鈕 ，然後將滑鼠移到架框裡面，以拉曳的方式佈置選擇鈕。佈置好這個選擇鈕之後，請做個小小的試驗：試著拉曳選擇鈕

5、到架框之外。如果這個選擇鈕不能超出架框的範圍，表示選擇鈕已經被框在架框裡面了，而這個佈置動作是成功的；如果選擇鈕可以超出架框的範圍，表示這個選擇鈕不屬於架框的群組，應該刪掉再重新佈置。(3)再做個小試驗：點選架框使它變成作用中，然後拉曳架框到不同的位置。如果架框裡的選擇鈕也都會跟著移動，才表示它們全部被放進架框了。只能單選的 選擇鈕 （Option Button） 選擇鈕 （Option Button）的功用好像考試時的單選題。以下讓我們逐步來解說上述表單的完成過程，設定各控制元件的屬性：物件屬性屬性值Frame1Caption請選擇性別是：Option1Caption男Option2Capt

6、ion女讀取選項當某一個選擇鈕被選擇時，該選擇鈕的Value屬性便成為True，而其他選擇鈕的Value屬性則為False，因此我們可以利用以下程式碼來判斷使用者選擇了哪一個選擇鈕。IF Option1.Value Then 先判斷Option1是否被選擇了 Print “1”Else Print “2” 若不是Option1，則一定是Option2被選擇了End IF實例演練3解說1. 首先是選取適當的控制元件：本表單共使用了三種控制元件，他們分別來自工具箱的標籤控制元件、命令鈕控制元件、文字方塊控制元件。命令鈕Command文字方塊Text標籤 Label選擇鈕 Option Button框架 Frame2. 接下來是物件屬性的設定：物件屬性屬性值Form1Caption訂書打折Frame1Caption包裝種類Option1Caption精裝版(+50元)Option2Caption一般版Command1Caption計算Label1Caption書本數量Label2Caption總金額Text1、Text2Text3. 雙按Comm