VB程序設(shè)計(jì)電子教案-第5章：程序用戶界面設(shè)計(jì)

第5章程序用戶界面設(shè)計(jì)對(duì)話框菜單設(shè)計(jì)工具欄、狀態(tài)欄設(shè)計(jì)本章學(xué)習(xí)目標(biāo)InputBox函數(shù)及MsgBox函數(shù)的靈活使用正確運(yùn)用通用對(duì)話框?qū)崿F(xiàn)文件的翻開與保存、字體及顏色的設(shè)置等操作熟練掌握下拉式菜單和彈出式菜單的設(shè)計(jì)與編程掌握剪貼板對(duì)象的根本編程以及在VB在調(diào)用外部應(yīng)用程序的根本方法根本掌握工具欄的設(shè)計(jì)步驟與編程方法對(duì)話框輸入輸出消息框通用對(duì)話框自定義對(duì)話框

常見的對(duì)話框包括輸入／輸出消息框、通用對(duì)話框以及用戶根據(jù)實(shí)際需要自行設(shè)計(jì)的的自定義對(duì)話框。輸入輸出消息框輸入輸出消息框就是主要用于信息輸出顯示及用戶數(shù)據(jù)輸入的對(duì)話框。輸入消息框輸出消息框輸入消息框根本格式：InputBox〔提示信息[，標(biāo)題][，缺省值][，x坐標(biāo)位置][，y坐標(biāo)位置]〕使用例如：s=InputBox("請(qǐng)輸入您的Email地址","用戶信息輸入")說明輸出消息框根本格式：MsgBox〔提示信息，[，按鈕數(shù)值][，標(biāo)題]〕使用例如：c=MsgBox("密碼錯(cuò)",21，"密碼核對(duì)")說明〔詳見教材〕用于指定按鈕數(shù)目及形式的VB常數(shù)

VB符號(hào)常量對(duì)應(yīng)數(shù)值功能VbOKOnly0顯示“確定”按鈕VbOKCancel1顯示“確定”、“取消”按鈕VbAbortRetryIgnore2顯示“終止”、“重試”、“忽略”按鈕VbYesNoCancel3顯示“是”、“否”、“取消”按鈕VbYesNo4顯示“是”、“否”按鈕VbRetryCancel5顯示“重試”、“取消”按鈕用于指定圖標(biāo)樣式的VB常數(shù)VB符號(hào)常量對(duì)應(yīng)數(shù)值功能VbCritical16顯示“嚴(yán)重錯(cuò)誤”圖標(biāo)VbQuestion32顯示“警告詢問”圖標(biāo)VbExclamation48顯示“警告錯(cuò)誤”圖標(biāo)VbInformation64顯示“信息”圖標(biāo)用于指定默認(rèn)選擇按鈕的VB常數(shù)VB符號(hào)常量對(duì)應(yīng)數(shù)值功能VbDefaultButton10第一個(gè)按鈕為默認(rèn)選擇按鈕VbDefaultButton2256第二個(gè)按鈕為默認(rèn)選擇按鈕VbDefaultButton3512第三個(gè)按鈕為默認(rèn)選擇按鈕MsgBox函數(shù)的返回值VB符號(hào)常量對(duì)應(yīng)數(shù)值用戶的選擇按鈕VbOK1單擊“確定”按鈕VbCancel2單擊“取消”按鈕VbAbort3單擊“終止”按鈕VbRetry4單擊“重試”按鈕VbIgnore5單擊“忽略”按鈕VbYes6單擊“是”按鈕VbNo7單擊“否”按鈕通過對(duì)話框VB提供了一組基于Windows的常用的標(biāo)準(zhǔn)對(duì)話框界面，用戶可以充分利用通用對(duì)話框〔CommonDialog〕控件在窗體上創(chuàng)立6種標(biāo)準(zhǔn)對(duì)話框，它們分別是翻開〔Open〕、另存為〔SaveAs〕、顏色〔Color〕、字體〔Font〕、打印機(jī)〔Printer〕和幫助〔Help〕對(duì)話框。通用對(duì)話框的使用步驟通用對(duì)話框控件不屬于VB6.0的標(biāo)準(zhǔn)控件，默認(rèn)情況下未出現(xiàn)在開發(fā)環(huán)境的工具箱中，因此必須首先將該控件添加到工具箱中方可使用。通用對(duì)話框的編程一般應(yīng)包括以下三個(gè)步驟。將通用對(duì)話框添加到工具箱中在窗體上添加通用對(duì)話框控件對(duì)象，并設(shè)置其根本屬性或調(diào)用其根本方法個(gè)性化屬性設(shè)置及程序設(shè)計(jì)通用對(duì)話框的屬性和方法Action屬性Show方法打開的通用對(duì)話框的類型0無對(duì)話框顯示1ShowOpen打開文件對(duì)話框2ShowSave另存對(duì)話框3ShowColor顏色對(duì)話框4ShowFont字體對(duì)話框5ShowPrinter打印機(jī)對(duì)話框6ShowHelp幫助對(duì)話框通用對(duì)話框的“屬性頁(yè)”通用對(duì)話框的重要屬性和方法“翻開”/“另存為”對(duì)話框“顏色”對(duì)話框“字體”對(duì)話框其它對(duì)話框“翻開”/“另存為”對(duì)話框常用屬性屬性功能DialogTitle對(duì)話框標(biāo)題FileName返回或設(shè)置用戶所要打開或另存為的文件的文件路徑和文件名FileTitle返回或設(shè)置用戶所要打開或另存為的文件名Filter過濾器屬性，是一個(gè)字符串，用于設(shè)置對(duì)話框中可以顯示的文件類型FilterIndex過濾器索引屬性，是一整數(shù)，表示文件列表框中默認(rèn)的文件類型是Filter屬性的設(shè)置的第幾組。InitDir初始化路徑屬性，設(shè)置對(duì)話框的初始文件目錄DefaultExt設(shè)置保存文件時(shí)默認(rèn)的文件擴(kuò)展名“顏色”對(duì)話框的常用屬性顏色對(duì)話框中最重要的屬性就是Color，用于設(shè)定或返回用戶在顏色對(duì)話框中選定的顏色。PrivateSubForm_Click()CommonDialog1.Action=3Form1.BackColor=CommonDialog1.ColorEndSub“字體”對(duì)話框的常用屬性屬性功能Flags設(shè)置或返回“字體”對(duì)話框的樣式。flag的值：1：對(duì)話框只列出系統(tǒng)支持的屏幕字體；2：只列出打印機(jī)支持的字體；3：列出可用的打印機(jī)和屏幕字體；4：對(duì)話框中顯示“幫助”按鈕；256：對(duì)話框中允許設(shè)置刪除線、下劃線和顏色效果；Color返回在“字體”對(duì)話框中選中的字體顏色。FontName返回在“字體”對(duì)話框中選中的字體名稱FontSize返回在“字體”對(duì)話框中選中的字號(hào)FontBold返回在“字體”對(duì)話框中是否選中了粗體字FontItalic返回在“字體”對(duì)話框中是否選中了斜體字FontUnderline返回在“字體”對(duì)話框中是否選中了下劃線FontStrikethru返回在“字體”對(duì)話框中是否選中了刪除線通用對(duì)話框應(yīng)用實(shí)例【實(shí)例5-1】編程在VB中用Windows畫圖軟件mspaint.exe直接翻開相關(guān)圖形文件。實(shí)例5-1程序界面實(shí)例5-1程序?qū)崿F(xiàn)分析通用對(duì)話框的屬性設(shè)置在窗體中顯示圖像文件的路徑與文件名的實(shí)現(xiàn)如何調(diào)用外部程序編輯圖像文件實(shí)現(xiàn)步驟代碼清單自定義對(duì)話框創(chuàng)立自定義對(duì)話框就是建立一個(gè)窗體，然后根據(jù)實(shí)際需要或自己的喜好在窗體上放置控件，通過設(shè)置屬性值來自定義窗體的外觀。模式對(duì)話框與無模式對(duì)話框自定義對(duì)話框的顯示自定義對(duì)話框的顯示顯示要求代碼形式說明顯示為模式對(duì)話框MyDialog.ShowvbModal符號(hào)常量vbModal的值為1，說明顯示的類型為模式對(duì)話框顯示為無模式對(duì)話框MyDialog.ShowMyDialog.ShowvbModelessvbModeless的值為0將MyDialog作為Form1的子窗體顯示MyDialog.Show0,Form1可以確保對(duì)話框在它的父窗體最小化時(shí)它也最小化，或者在其父窗體關(guān)閉時(shí)它也卸載（最大化時(shí)不變），此時(shí)只能是無模式顯示（否則無法對(duì)主窗體操作）菜單設(shè)計(jì)菜單編輯器菜單編程例如菜單控件數(shù)組的應(yīng)用彈出式菜單菜單綜合實(shí)例菜單編輯器翻開菜單編輯器菜單編輯器的界面及屬性菜單的建立菜單的建立①翻開菜單編輯器；②輸入標(biāo)題屬性，名稱屬性；③選擇快捷鍵，復(fù)選、有效、可見等屬性；④運(yùn)用箭頭鍵調(diào)整當(dāng)前菜單位置；⑤重復(fù)上述四步直至完成菜單的輸入；⑥單擊“確定”按鈕。菜單編程例如菜單相關(guān)知識(shí)點(diǎn)控制菜單項(xiàng)的有效性設(shè)置菜單項(xiàng)勾選標(biāo)記菜單控件數(shù)組的應(yīng)用菜單控件數(shù)組的使用場(chǎng)合菜單控件數(shù)組的建立用菜單控件數(shù)組修改簡(jiǎn)單菜單程序動(dòng)態(tài)菜單的建立菜單控件數(shù)組的使用場(chǎng)合對(duì)于一些功能相似的菜單項(xiàng)設(shè)置成菜單數(shù)組可簡(jiǎn)化代碼的書寫需根據(jù)運(yùn)行時(shí)的具體情況建立動(dòng)態(tài)菜單項(xiàng)菜單控件數(shù)組的建立菜單控件數(shù)組的建立方法與普通的菜單建立相類似，只需在菜單編輯器中，將同一個(gè)菜單控件數(shù)組中的各菜單項(xiàng)的名稱置為相同，即名稱輸入框中的菜單名稱完全一樣，而各自的索引輸入框中輸入不同的值動(dòng)態(tài)菜單本卷須知對(duì)于要求動(dòng)態(tài)顯示的菜單項(xiàng)，其菜單項(xiàng)的添加與刪除分別用Load和Unload語(yǔ)句實(shí)現(xiàn)，其語(yǔ)法格式為：添加菜單數(shù)組元素：Load菜單數(shù)組名〔index〕刪除菜單數(shù)組元素UnLoad菜單數(shù)組名〔index〕其中，Index指菜單項(xiàng)的索引值。不能刪除在設(shè)計(jì)時(shí)創(chuàng)立的菜單項(xiàng)。Unload語(yǔ)句是將菜單項(xiàng)從內(nèi)存中刪除，如果只想讓菜單項(xiàng)隱藏不可見，并不想從內(nèi)存中去除，那么只需調(diào)用Hide方法或令該菜單項(xiàng)的Visible屬性為False。彈出式菜單彈出式菜單又稱快捷菜單、上下文菜單，是獨(dú)立于菜單欄而顯示在窗體上的浮動(dòng)菜單，一般通過單擊鼠標(biāo)右鍵來激活。彈出式菜單所顯示的內(nèi)容取決于按下鼠標(biāo)右鍵時(shí)鼠標(biāo)指針的位置。在VB中，彈出式菜單的實(shí)現(xiàn)要用到下拉式菜單的設(shè)計(jì)技術(shù)和PopupMenu方法。彈出式菜單使用演示〔參見教材〕菜單綜合實(shí)例【實(shí)例5-2】編程建立一個(gè)可對(duì)輸入的文本進(jìn)行簡(jiǎn)單編輯與修飾的文本編輯窗口【實(shí)例5-2】程序功能要求簡(jiǎn)單文本編輯窗口.vbp【實(shí)例5-2】程序?qū)崿F(xiàn)分析程序的界面設(shè)計(jì)如何實(shí)現(xiàn)文本框的大小隨著窗體的大小變化而變化與復(fù)制、剪切、粘貼相關(guān)的操作當(dāng)已有選取的文本時(shí)，那么相關(guān)菜單項(xiàng)應(yīng)變可選剪貼板對(duì)象Clipboard剪貼板對(duì)象Clipboard的主要方法方法功能Clear清除Clipboard上的內(nèi)容GetText返回保存在Clipboard上的文本SetText復(fù)制文本到Clipboard上GetData返回保存在Clipboard上的圖像文件SetData使用指定的圖形格式將圖像保存在Clipboard上GetFormat返回Clipboard對(duì)象中的項(xiàng)目格式工具欄、狀態(tài)欄設(shè)計(jì)工具欄設(shè)計(jì)步驟工具欄的代碼設(shè)計(jì)工具欄設(shè)計(jì)步驟向工具箱中添加工具欄控件在窗體中參加工具欄控件對(duì)象為圖像工具欄準(zhǔn)備圖像列表建立工具欄與圖像列表控件對(duì)象之間的關(guān)聯(lián)從圖像列表控件對(duì)象的圖像庫(kù)中選擇各工具欄按鈕的圖像，并設(shè)置其它所需屬性工具欄的代碼設(shè)計(jì)工具欄控件能響應(yīng)的事件中最常用的就是ButtonClick事件，當(dāng)用戶單擊工具欄中的圖標(biāo)按鈕時(shí)激發(fā)該事件。在工具欄的ButtonClick事件代碼中，一般采用SelectCase語(yǔ)句來處理各按鈕的功能代碼，而區(qū)分用戶單擊了哪個(gè)按鈕那么可通過按鈕的索引值工具欄代碼的一般形式SelectCaseButton.keyCase“tbrCut”Clipboard.SetTextText1.SelTextText1.SelText=""……EndSelect動(dòng)態(tài)工具欄的設(shè)計(jì)如果要在程序運(yùn)行階段對(duì)工具欄中的按鈕進(jìn)行動(dòng)態(tài)地添加或刪除，那么必須使用工具欄控件的Add方法、Remove方法等，此時(shí)，工具欄中的按鈕作為一個(gè)Buttons集合的對(duì)象來訪問。Add方法的使用Remove方法的使用工具欄的Add方法一般格式對(duì)象名.Button