充分?jǐn)U充VisualBasic功能

2019-11-18 17:32:03

字體：大中小

供稿：網(wǎng)友

VisualBasicforWindowss3.0（簡稱VB）是目前開發(fā)WINDOWS應(yīng)用軟件的最有效工具之一，它綜合運(yùn)用了BAIC語言和新的可視化設(shè)計(jì)工具，不僅功能強(qiáng)大，而且簡單易學(xué)。其次，VB具有事件驅(qū)動的編程機(jī)制，它充分利用WINDOWS圖形環(huán)境的特點(diǎn)，能讓開發(fā)人員快速地構(gòu)造強(qiáng)大的應(yīng)用程序。
那么在開發(fā)VB應(yīng)用軟件時(shí)，如何充分地?cái)U(kuò)充VB的功能呢？這就要求在不同的層次上要很好地利用VB最具威力和特色的部分：
●在函數(shù)層調(diào)用動態(tài)鏈接庫。
●在控件層使用VBX。●在應(yīng)用層執(zhí)行其他應(yīng)用程序。
一、在函數(shù)層調(diào)用功能態(tài)鏈接庫（DLL）
WINDOWS操作系統(tǒng)實(shí)際上是由許多功能強(qiáng)大的動態(tài)鏈接庫（DLL）組合而成。VB考慮到有些工作超過自身語言所及的能力范圍，所以提供了直接調(diào)用操作系統(tǒng)中這些DLL子程序的能力。例如：在正常情況下，窗口的控制菜單提供了七種功能：還原、移動、大小、最小化、最大化、關(guān)閉和切換。而在實(shí)際應(yīng)用中，我們希望窗口按設(shè)計(jì)時(shí)的大小顯示，不允許用戶隨意改變窗口大小，也不允許切換到其他窗口，這就要求在設(shè)計(jì)時(shí)必須刪除控制菜單中除“移動”和“關(guān)閉”選項(xiàng)以外的所有控制菜單項(xiàng)。要完成這一任務(wù)，我們首先可把窗體的MaxButton屬性和MinButton屬性設(shè)置為False，不允許窗體最小化和最大化，窗體也就不能還原。然后再把窗體的Bordersstyle屬性設(shè)置為1－FixedSingle或3－FixedDouble，不允許窗體改變大小。但VB本身卻無法刪除“切換”選項(xiàng)和兩條分隔線。幸運(yùn)的是，通過調(diào)用WINDOWSDLL就很容易做到。
通常，要使用WINDOWSDLL，首先必須說明要使用的DLL子程序，我們可在兩個(gè)地方說明所使用的DLL子程序，即在全局模塊中說明，或者在窗體層的說明部分中說明。其格式是：
DeclareSub子程序名Lib“庫名”［Alias“別名”］［（［參數(shù)］）］
DeclareFunction子程序名Lib“庫名”［Aliass“別名”］［（［參數(shù)］）］［AS數(shù)據(jù)類型］
第一種格式表示過程沒有返回值，第二種格式表示過程返回一個(gè)值，該值可用于表達(dá)式中，庫名如果用的是WINDOWS操作環(huán)境（在System目錄下）中的庫，如“USER.EXE”，“KERNEL.EXE”或者“GDI.EXE”等，就用此名作為庫名。如果用的是其他來源的DLL，則用包括路徑的文件名稱（如：“C：＼WINDOWS＼BRUSH.DLL”）。別名（Alias）是允許另外使用別的名稱來稱呼子程序，尤其是當(dāng)外來子程序名與VB保留字相同時(shí)，它就顯得特別有用，參數(shù)指要被傳遞到子程序的參數(shù)值，數(shù)據(jù)類型指的是函數(shù)返回值的數(shù)據(jù)類型，它可能是Integer，Long，Single，Double，Currency或String。下面就是所要使用的DLL子程序的說明：
DeclareFunctionGetSystemMenu％Lib＂User＂（ByValhWnd％，ByValbRevert％）
Declare＼function＼RemoveMenu％Lib＂User＂（ByValhMenu％，ByValnPosition％，ByValwFlags％）
當(dāng)說明完DLL子程序后，執(zhí)行DLL子程序的方法，就象在VB中執(zhí)行通用過程（函數(shù)）一樣。下面我們編寫一個(gè)名為Remove－Items－From－System的過程來完成上面例子中提到的功能，過程中調(diào)用了上述說明過的兩個(gè)DLL子程序：
Subremove－Items－From－Sysmenu（A－FormAsForm）
'獲取窗體系統(tǒng)菜單句炳
HSysMenu＝GetSystemMenu（A－Form.hWnd，0）
'刪除除“移動”和“關(guān)閉”外的所有菜單項(xiàng)，刪除時(shí)必須從最后一個(gè)菜單項(xiàng)開始
R＝RemoveMenu（HSysMenu，8，MF－BYPOSITION）'刪除切換
R＝RemoveMenu（HSysMenu，7，MF－BYPOSITION）'刪除第一條分隔線
R＝RemoveMenu（HSysMenu，5，MF－BYPOSITION）'刪除第二條分隔線
EndSub
有了這個(gè)過程，在任一窗體的Form－Load事件中加入下面一行代碼就可以刪除該窗體除“移動”和“關(guān)閉”選項(xiàng)以外的所有控制菜單項(xiàng)：
Remove－Items－From－SysmenuMe
二、在控件層使用VBX
VB功能強(qiáng)大的第二個(gè)部分是VBX的使用，即其開放及無限擴(kuò)增的特性。雖然VB工具箱（ToolBox）已經(jīng)盡量將設(shè)計(jì)應(yīng)用軟件所需的工具包括在內(nèi)，但是，為了不斷擴(kuò)充VB的功能，VB提供了一套開發(fā)工具（CustomControlDevelopmentKit）供第三方開發(fā)者來設(shè)計(jì)所需要的控件。當(dāng)設(shè)計(jì)完控件文件后（其文件擴(kuò)展名為“.VBX”）可以從菜單“file”項(xiàng)下選“AddFile...”命令，結(jié)果畫面上出現(xiàn)一個(gè)＂AddFile＂對話框，雙擊所需的VBX文件名即可將該VBX加入到VB中，這些控件裝入VB后，VB會將這些外來控件加到原有工具箱中，與其他控件一起合并使用。正是因?yàn)橛辛诉@一技術(shù)，VB才能夠不斷發(fā)展，使用VB編程也更為方便、迅速和有效，這是VB區(qū)別于其他程序開發(fā)環(huán)境的主要特色之一。自從VB推出以來，第三方軟件公司設(shè)計(jì)了大量的新控件，下面是開發(fā)WINDOWS應(yīng)用程序時(shí)幾個(gè)非常有用的VBX：
●三維控件Threed.vbx
它提供了包括命令按鈕、復(fù)選框、單選鈕、框架、下推按鈕和面板在內(nèi)的六種三維控件，使用這些控件可使窗體更具有立體感。
●圖形控件Graph.vbx
向圖形控件發(fā)送數(shù)據(jù)后，圖形控件可繪制二維或三維餅圖，、直方圖、趨勢圖，并且可以打印或拷貝到剪貼板上。
●通訊控件Mscomm.vbx
它提供了串行通訊的能力，可用于串行端口之間傳送和接收數(shù)據(jù)。
●數(shù)據(jù)網(wǎng)格控件Truegrid.vbx
它既可以作為一般的數(shù)據(jù)顯示表格，也可把一個(gè)數(shù)據(jù)庫和一個(gè)網(wǎng)格聯(lián)系起來，它是制作數(shù)據(jù)庫瀏覽器或數(shù)據(jù)顯示的理想工具。
二、在應(yīng)用層執(zhí)行其他應(yīng)用程序
在編制復(fù)雜的大型軟件時(shí)，我們經(jīng)常會需要有一些功能相對獨(dú)立和完善的專用程序，如編輯程序，而這些程序通常是通用和流行并經(jīng)實(shí)踐檢驗(yàn)的。如果由開發(fā)者重新編制這些程序，不僅大大增加了程序工作量以及調(diào)試過程，而且功能上很難比得上這些通用程序。顯然，如果我們能直接調(diào)用這些程序是最為理想的。令人欣喜的是，VB提供了一個(gè)可用來調(diào)用其他應(yīng)用程序的Shell函數(shù)，使VB的某些功能可直接由其他應(yīng)用程序來完成，從而大大地減少了編程任務(wù)。
格式是Shell（命令字符串［，窗口類型］）
其中的命令字符串是欲執(zhí)行的應(yīng)用程序名，可執(zhí)行文件的擴(kuò)展名只限于“.COM”，“.EXE”，“.BAT”，“.PIF”，缺省擴(kuò)展名為.EXE文件，窗口類型是一整數(shù)值，它對應(yīng)于程序執(zhí)行時(shí)的顯示窗口風(fēng)格，是可選的，共有下列5種選擇：
窗口類型值
窗口類型1，5，9
正常窗口，具有指針2
最小窗口，具有指針（缺?。?
最大窗口，具有指針4，8
正常窗口，不具指針6，7
最小窗口，不具指針
當(dāng)Shell函數(shù)成功地調(diào)用某一個(gè)應(yīng)用程序時(shí)，返回一個(gè)任務(wù)標(biāo)識（TaskID），該ID表示正在執(zhí)行的程序的唯一標(biāo)識。
［例］
X＝Shell（＂C：＼WINDOWS／NOTEPAD.EXE＂，1）
該語句調(diào)用WINDOWS附件中的記事本NOTEPAD.EXE作為編輯程序來使用，并返回1個(gè)ID值到X。->

上一篇：成組更新控件屬性

下一篇：VisualBasic中實(shí)現(xiàn)繪圖區(qū)的大十字光標(biāo)