【正文】 新輸入”命令按鈕，則清空兩個文本框中的內容，并將插入點置于第一個第五章 窗體和標準控件 24 文本框中；如果單擊“退出程序”命令按鈕，則結束程序的運行。 實例 05（見程序 EX05）： 建立如下圖所示的窗體，要求程序能對輸入的“性別”和“郵政編碼”進行校驗。 ? 常用屬性： Name、 Caption、 Font、 Enabled、 Visible、 BackColor、 ForeColor、Value 等 ? 主要事件： Click 等，不支持雙擊事件 單選按鈕（ OptionButton） 單選按鈕通常以按鈕組的形式出現，用戶可從中選擇一個選項。 ? 常用屬性： Name、 Caption、 Font、 Enabled、 Visible、 BackColor、 ForeColor、List、 ListCount、 ListIndex、 Selected、 Sorted、 Text 等 ? 主要事件： Click、 DbClick 等 第五章 窗體和標準控件 26 ? 常用方法： AddItem、 RemoveItem、 Clear 等 List 屬性包含一個數組，用于訪問列表框中的項目。 ListIndex 屬性只能在程序中設置或引用，表示在列表框控件中當前所選項目的索引號。 Sorted 屬性指定控件中的項目是否自動按字母順序排序。要求：單擊“添加”按鈕，可將文本框中輸入的內容添加到下面的列表框；單擊“刪除”按鈕可刪除列表框中選定的項目；單擊“統(tǒng)計人數”按鈕，可將列表框中的項目總數輸出到右邊的文本框（該文本框不允許用戶編輯）。 滾動條（ HScrollBar、 VScrollBar） 第五章 窗體和標準控件 28 定時器（ Timer） 定時器是應用程序控制定時發(fā)生事件的控件。 要求：用戶可以從“姓名”列表中選擇項目或輸入新的姓名，對于列表中沒有的姓 名可自動添加到列表中；“班級”及“性別”只允許選擇；單擊 OK 按鈕，即可在“選擇結果”下面的標簽中輸出選擇結果；單擊 Delete 按鈕，可刪除“姓名”組合框中的所選項目；單擊 Exit 按鈕，則退出程序；設置“字體”和“字號”，其效果反映在“選擇結果”標簽中。 InputBox 函數是 VB 中用來生成輸入對話框的函數，常用格式如下： InputBox(prompt[,title][,default][,xpos,ypos]) 通用對話框 通用對話框是一種控件，稱為 CommonDialog。 Action 屬性值及其含義如下： ? 0：不顯示對話框 第五章 窗體和標準控件 30 ? 1：顯示“打開”對話框 ? 2：顯示“另存為”對話框 ? 3：顯示“顏色”對話框 ? 4：顯示“字體”對話框 ? 5：顯示：“打印”對話框 ? 6：顯示幫助文件 基本屬性： DialogTitle、 CanceError 等。 例： = c:\windows\*.bmp s = n = “另存為”對話框 “另存為”對話框的常用屬性與“打開”對話框相同。 例： Private Sub Command1_Click() For I = 1 To Next I End Sub “幫助”對話框 例： Private Sub Command1_Click() = C:\Program Files\DevStudio\VB\Help\ = 9 End Sub 自定義對話框 （略） 模式對話框與非模 式對話框 自定義對話框的設計 第五章 窗體和標準控件 32 第七章 菜單、工具欄、狀態(tài)欄及多文檔界面 在 Windows 應用程序中，一般都有菜單、工具欄和狀態(tài)欄。菜單控件只包含一個 Click 事件。 注意： ? 輸入 菜單命令標題時可用符號“ amp。要求：程序運行初期，在窗體左邊的列表框中生成 10 個由小到大排列的 10 到 100 之間的隨機整數，相應的動態(tài)菜單如下圖所示；如果選擇“轉移”菜單下面的“右移”命令，則左邊列表框的 10 個數移動到右邊的列表框中，并由大到小排列；再打開“轉移”菜單，則只有“左移”命令可用。 基本操作步驟： ? 創(chuàng)建菜單 ? 添加 Windows Common 控件部件 ? 在窗體上添加圖像列表控件（ ImageList） ? 在窗體上添加工具欄控件，將 ToolBar 控件與 ImageList 控件相關 聯(lián)，并加入代表單個按鈕的對象 ? 為每個按鈕編寫程序 工具欄控件作用實例 2P168[例 ]設計一個窗口外觀如下圖所示的程序，在窗口下方的“請輸入”文本框中輸入一句名言，選擇“編輯”菜單中的“名言展示”命令，名言就被添加到窗口中間的“名言展示”文本框中。 多文檔界面（ MDI） 在 Windows 應用程序中，通常有兩種操作界面形式：單文檔界面（ SDISingle Document Interface）和多文檔界面（ MDIMultiple Document Interface）。 ? 當一個子窗體最小化時，它只以一個標題欄形式顯示在父窗體內，而不第五章 窗體和標準控件 36 是顯示在 Windows 系統(tǒng)的任務欄中。 程序見 20708 VB6 程序設計 37 第八章 處理鼠標與鍵盤事件 處理鼠標事件 鼠標事件 檢測鼠標按鈕 檢 測 Shift、 Ctrl及 Alt鍵的狀態(tài) 使用鼠標實現拖放 DragDrop和 DragOver 事件 自動拖放和手工拖放 自定義鼠標指針 處理鍵盤事件 應用舉例 第五章 窗體和標準控件 38 第九章 圖形操作 VB 坐標系統(tǒng) 系統(tǒng)坐標系統(tǒng) 轉換坐標系統(tǒng)的刻度 自定義坐標系統(tǒng) 圖形的屬性 X 軸 Y 軸 原點 (0,0) VB6 程序設計 39 線寬和線型 填充 顏色 圖形方法 Cls方法 清除運行時窗體或圖片框產生的圖形或文本 ，并將畫筆置于坐標原點 。 格式： [Object.]Pset [Step](x,y)[,Color] 其中， Object 指的是窗體或圖片框等對象，缺省時指當前窗體； (x,y)用于設定畫點的坐標，若前面有關鍵字 Step，則是相對于 CurrentX 和 CurrentY 屬性提供的當前坐標的相對值； Color 用于設定該點的顏色，缺省為當前的 ForeColor屬性指定的顏色。 程序見 30901 Circle 方法 用來畫圓、橢圓以及圓弧。 圖片框既可用于顯示靜態(tài)圖形又可用于播放動態(tài)圖形，而圖像框只能用于顯示靜態(tài)圖像。設計時可以通過選擇圖片文件或粘貼剪貼板上圖片方式加載圖片，運行時可以使用 LoadPicture 函數或對象間圖片的相互復制方式加載圖片。利用 Shape 控件的一些屬性設置就可以繪制出多種形狀的圖形，并可確定它們的顏色、 填充樣式、邊框樣式等。 調試窗口 調試窗口是 VB 的重要調試工具，在逐條運行語句時可用調試窗口監(jiān)視表達式和變量的值。 跟蹤調試 當一個應用程序的運行得不到正確的結果時，首先應估計出錯的范圍；再設置幾個斷點，將問題區(qū)域進行隔離；然后用逐語句、逐過程和跳出等調試工具，跟蹤觀察每個語句的執(zhí)行效果。 Err 對象的屬性由錯誤源自動設置。 文件系統(tǒng)控件 要進行文件的復制、移動等操作，必然要訪問驅動器、文件夾。所以要在順序文件中找一個記錄，必須從頭一個一。 DriveListBox控件 ? 主要屬性： Drive ? 主要事件： Change DirListBox控件 ? 主要屬性： Path ? 主要事件： Change FileListBox控件 ? 主要屬性： Archive、 Hidden、 Normal、 ReadOnly、 System、 FileName、ListIndex、 ListCount、 List、 MultiSelect、 Path、 Selected ? 主要事件： PathChange、 Click 例： Private Sub Dir1_Change() = End Sub Private Sub Drive1_Change() = End Sub Private Sub File1_Click() For i = 0 To 1 If (i) Then MsgBox (i) End If Next i End Sub VB6 程序設計 45 Private Sub Form_Load() = True = False = False = False = False End Sub FileSystem Object(FSO)對象模型 FileSystem Object(FSO)對象模型簡介 FileSystem Object(FSO)對象 Drive 對象 Folder對象 File 對象 TextStream對象 文件讀寫 VB 的文件系統(tǒng) VB 根據計算機訪問文件的方式將文件分成三類：順序文件、隨機文件和二進制文件。 ? Err 對象的主要屬性： Number、 Description、 Source ? Err 對象的方法： Clear、 Raise 錯誤陷阱 為了防止致命錯誤的發(fā)生，在 VB 應用程序中應采用錯誤陷阱的方法。為了防止因運行錯誤而使應用程序中斷， VB 提供了對錯誤的捕獲和處理能力，以防止致命錯誤的發(fā)生。 斷點 調試 ? 設置斷點 通過菜單、工具欄上的工具、鼠標或鍵盤都可設置斷點。 在 VB 集成開發(fā)環(huán)境中，應用程序有三種工作模式：設計模式、運行模式、中斷模式。如果圖像太大，則可通過滾動條調整位置。 功能上圖片框比圖像框強，但圖像框使用的系統(tǒng)資源較少并且顯示圖形的速度較快。 PaintPicture 方法 圖形控件 圖片框和圖像控件 圖片框（ PictureBox）和圖像框（ Image）控件是顯示圖形圖像的主要控件，都能用來顯示圖形。 格式： [Object.]Line[ Step][(x1,y1)][Step](x2,y2)[,Color][,B[F]] 其中， Object 指的是窗體或圖片框等對象，缺省時指當前窗體； (x1,y1)用于表示直線或矩形的起點坐標，如果省略，起點坐標為當前坐標，若前面有關鍵字Step，則表示起點坐標是相對于當前坐標的相對值； (x2,y2)用于表示直線或矩形第五章 窗體和標準控件 40 的終點坐標，若前面有關鍵字 Step，則表示終點坐標是相對于起點的相對值；Color 用于設定該點的顏色，缺省為當前的 ForeColor 屬性指定的顏 色； B 表示利用對角坐標畫出矩形； F 必須與參數 B 同時使用，表示矩形以矩形邊框的顏色填充。 注意：在設計時窗體中用 Picture 屬性設置的 背景位圖和放置的控件，并不受此命令影響。 ? 當前活動子窗體的菜單將顯示在父窗體的菜單欄中，而不是顯示在子窗體中。 MDI 應用程序中的父窗體及其所有子窗體具有以下一些性質： ? 所有子窗體都顯示在父窗體的工作區(qū)域內。 狀態(tài)欄控件（ StatusBar） 應用舉例 2P177[例 ]在程序 20706 中加上狀態(tài)欄，顯示文本框 Text1 中展示的名言句數和總長，以及系統(tǒng)日期和 系統(tǒng)時間。 第五章 窗體和標準控件 34 程序見 20703