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