副程式 將可以重複使用的程式區塊獨立而成 寫在Private Sub 函數名稱() 副程式碼 End Sub 呼叫副程式

Presentation on theme: "副程式 將可以重複使用的程式區塊獨立而成 寫在Private Sub 函數名稱() 副程式碼 End Sub 呼叫副程式"— Presentation transcript:

1 副程式 將可以重複使用的程式區塊獨立而成 寫在Private Sub 函數名稱() 副程式碼 End Sub 呼叫副程式
可以使用call或直接使用副程式的姓名

2 函數 內定函數，如Time, date, cls, line 自訂函數 寫在 Function 函數名稱() 程式碼 函數名稱=傳回值
End Function 可以有傳回值 直接使用其函數名接上參數就可以使用

3 偵測鍵盤按鍵 使用 KeyPress 事件，並由KeyAscii 參數接收哪一個按鍵被按下
物件_KeyPress（KeyAscii As Integer） ch=Chr (KeyAscii) 將KeyAscii轉成字元 Keyascii=Asc (ch) 將ch轉成ASCII碼 撰寫只能輸入數字的輸入框

4 程式按下Q就結束 ' -----------------------------------------------
' 物件名稱：Form 事件名稱：KeyPress - ' 只要有按鍵發生即產生此事件，若是按q或Q鍵則程 - ' 式執行結束 Private Sub Form_KeyPress(KeyAscii As Integer) ch = Chr(KeyAscii) If ch = "q" Or ch = "Q" Then ' 檢查是否按q或Q End ' 若是則程式結束 End If End Sub

5 輸入輸出資料對話框 輸入使用內定函數 InputBox InputBox 提示訊息,[標題],[輸入預設值],[xpos,ypos]
輸出使用MsgBox MsgBox 回應訊息,視窗類型,標題 Chr(13)  換行 視窗類型

6 Msgbox視窗類型

7 Msgbox視窗類型 按鈕類型+表單類型+圖示類型  決定視窗顯示方式

8 單一表單 顯示表單  表單.show 關閉表單  unload 表單 WindowState屬性 StartUpPosition屬性

9 MDI表單 其他表單容器 子表單設定MDIChild屬性 設定起始表單為MDI 表單切換 表單排列 0  重疊 1  水平 2  垂直

10 功能表編輯器(下拉選單) 設定”標題”顯示 設定”名稱”控制 “-”  分隔線

11 起動畫面

12 製作EXE檔案 由VB的環境中選擇檔案製成 XXX.EXE 可攜性依程式的複雜度而定

13 封裝程式－封裝暨部署精靈 記得先存檔

14 封裝程式－封裝暨部署精靈 Step 1：選擇專案所在資料夾

15 封裝程式－封裝暨部署精靈 Step 2：如果沒有編譯會出現詢問視窗

16 封裝程式－封裝暨部署精靈 Step 3：選擇標準封裝類型

17 封裝程式－封裝暨部署精靈 Step 4：選擇封裝後檔案存放目錄

18 封裝程式－封裝暨部署精靈 Step 5：加入其他檔案或控制項

19 封裝程式－封裝暨部署精靈 Step 6：選擇封裝的封包選項

20 封裝程式－封裝暨部署精靈 Step 7：輸入安裝時出現的標題

21 封裝程式－封裝暨部署精靈 Step 8：設定開始功能表中的結構

22 封裝程式－封裝暨部署精靈 Step 9：選擇檔案安裝的目錄

23 封裝程式－封裝暨部署精靈 Step 10：設定公用檔案

24 封裝程式－封裝暨部署精靈 Step 11：儲存腳本下次使用

25 封裝程式－封裝暨部署精靈 Step 12：封裝完成