提高代碼的運(yùn)行速度綜述

1、提高代碼的運(yùn)行速度本文描述了如何通過(guò)一些技術(shù)手段來(lái)提高 VB 代碼的執(zhí)行效率。這些手段可以分為兩個(gè)大的部分：編碼技術(shù)和 編譯優(yōu)化技術(shù)。本文從編碼技術(shù)和編譯技術(shù)來(lái)討論。第一部分：編碼技術(shù)。 下面的這些方法（到現(xiàn)在為止共 27 種）可以幫助你提高代碼的運(yùn)行速度：1. 使用整數(shù)（Integer）和長(zhǎng)整數(shù)（Long） 提高代碼運(yùn)行速度最簡(jiǎn)單的方法莫過(guò)于使用正確的數(shù)據(jù)類(lèi)型了。也許你不相信，但是正確地選擇數(shù)據(jù)類(lèi)型可以大幅度提升代碼的性能。在大多數(shù)情況下，程序員可以將Single，Double 和 Currency 類(lèi)型的變量替換為Integer 或 Long 類(lèi)型的變量，因?yàn)?VB 處理 Integer

2、和 Long 的能力遠(yuǎn)遠(yuǎn)高于處理其它幾種數(shù)據(jù)類(lèi)型。下面是排 序：Long 最快 Integer . Byte . Single .Double . Currency 最慢在大多數(shù)情況下，程序員選擇使用 Single 或 Double 的原因是因?yàn)樗鼈兡軌虮４嫘?shù)。但是小數(shù)也可以保存 在Integer類(lèi)型的變量中。例如程序中約定有三位小數(shù)，那么只需要將保存在Integer變量中的數(shù)值除以1000就可以得到結(jié)果。根據(jù)我的經(jīng)驗(yàn)，使用 Integer 和 Long 替代 Single， Double 和 Currency 后，代碼的運(yùn)行速度可以 提高將近 10 倍。2. 避免使用變體對(duì)于一個(gè) VB 程

3、序員來(lái)說(shuō)，這是再明顯不過(guò)的事情了。變體類(lèi)型的變量需要16 個(gè)字節(jié)的空間來(lái)保存數(shù)據(jù)，而一個(gè)整數(shù)（Integer）只需要2個(gè)字節(jié)。通常使用變體類(lèi)型的目的是為了減少設(shè)計(jì)的工作量和代碼量，也有的程 序員圖個(gè)省事而使用它。但是如果一個(gè)軟件經(jīng)過(guò)了嚴(yán)格設(shè)計(jì)和按照規(guī)范編碼的話，完全可以避免使用變體類(lèi) 型。在這里順帶提一句，對(duì)于 Object 對(duì)象也存在同樣的問(wèn)題。請(qǐng)看下面的代碼：Dim FSOSet FSO = New Scripting.FileSystemObject或Dim FSO as objectSet FSO = New Scripting.FileSystemObject上面的代碼由于在申明的時(shí)

4、候沒(méi)有指定數(shù)據(jù)類(lèi)型，在賦值時(shí)將浪費(fèi)內(nèi)存和CPU 時(shí)間。正確的代碼應(yīng)該象下面這樣：Dim FSO as New FileSystemObject3. 盡量避免使用屬性Property ），尤在平時(shí)的代碼中，最常見(jiàn)的比較低效的代碼就是在可以使用變量的情況下，反復(fù)使用屬性（ 其是在循環(huán)中。要知道存取變量的速度是存取屬性的速度的 20 倍左右。下面這段代碼是很多程序員在程序中會(huì) 使用到的：Dim intCon as IntegerFor intCon = 0 to Ubound(SomVar()Text1.Text = Text1.Text & vbcrlf & SomeVar(intCon)Next

5、 intCon下面這段代碼的執(zhí)行速度是上面代碼的 20 倍。Dim intCon as IntegerDim sOutput as StringFor intCon = 0 to Ubound(SomeVar()sOutput = sOutput & vbCrlf &SomeVar(intCon)NextText1.Text = sOutput同樣地，像這樣的代碼 . . .Do Until EOF(F)Line Input #F, nextLineText1.Text = Text1.Text + nextLineLoop. . . 比下面的代碼慢得多：Do Until EOF(F)Line

6、 Input #F, nextLinebufferVar = bufferVar + nextLineLoopText1.Text = bufferVar然而，下面的代碼完成了相同的功能，而且還要快：Text1.Text = Input(F, LOF(F)如上述，幾種方法都實(shí)現(xiàn)了同樣的任務(wù)；同時(shí)，最好的算法也是最優(yōu)的。4. 盡量使用數(shù)組，避免使用集合除非你必須使用集合( Collection )，否則你應(yīng)該盡量使用數(shù)組。據(jù)測(cè)試，數(shù)組的存取速度可以達(dá)到集合的100 倍。這個(gè)數(shù)字聽(tīng)起來(lái)有點(diǎn)駭人聽(tīng)聞，但是如果你考慮到集合是一個(gè)對(duì)象，你就會(huì)明白為什么差異會(huì)這么大。5. 展開(kāi)小的循環(huán)體在編碼的時(shí)候，有可

7、能遇到這種情況：一個(gè)循環(huán)體只會(huì)循環(huán) 2 到 3 次，而且循環(huán)體由幾行代碼組成。在這 種情況下，你可以把循環(huán)展開(kāi)。原因是循環(huán)會(huì)占用額外的 CPU 時(shí)間。但是如果循環(huán)比較復(fù)雜，你就沒(méi)有必要這樣做了。6. 避免使用很短的函數(shù)和使用小的循環(huán)體相同，調(diào)用只有幾行代碼的函數(shù)也是不經(jīng)濟(jì)的- 調(diào)用函數(shù)所花費(fèi)的時(shí)間或許比執(zhí)行函數(shù)中的代碼需要更長(zhǎng)的時(shí)間。在這種情況下，你可以把函數(shù)中的代碼拷貝到原來(lái)調(diào)用函數(shù)的地方。7. 減少對(duì)子對(duì)象的引用在 VB 中，通過(guò)使用 . 來(lái)實(shí)現(xiàn)對(duì)象的引用。例如：Form1.Text1.Text在上面的例子中，程序引用了兩個(gè)對(duì)象： Form1 和 Text1 。利用這種方法引用效率很低。但

8、遺憾的是，沒(méi)有 辦法可以避免它。程序員唯一可以做就是使用 With 或者將用另一個(gè)對(duì)象保存子對(duì)象（ Text1 ）。 使用 WithWith frmMain.Text1.Text = Learn VB.Alignment = 0.Tag = Its my life.BackColor = vbBlack.ForeColor = vbWhiteEnd With或者 使用另一個(gè)對(duì)象保存子對(duì)象Dim txtTextBox as TextBoxSet txtTextBox = frmMain.Text1TxtTextBox.Text = Learn VBTxtTextBox.Alignment = 0

9、TxtTextBox.Tag = Its my lifeTxtTextBox.BackColor = vbBlackTxtTextBox.ForeColor = vbWhite注意，上面提到的方法只適用于需要對(duì)一個(gè)對(duì)象的子對(duì)象進(jìn)行操作的時(shí)候，下面這段代碼是不正確的：With Text1.Text = Learn VB.Alignment = 0.Tag = Its my life.BackColor = vbBlack.ForeColor = vbWhiteEnd With很不幸的是，我們常常可以在實(shí)際的代碼中發(fā)現(xiàn)類(lèi)似于上面的代碼。這樣做只會(huì)使代碼的執(zhí)行速度更慢。原因是 With 塊編譯后會(huì)形

10、成一個(gè)分枝，會(huì)增加了額外的處理工作。8. 檢查字符串是否為空大多數(shù)程序員在檢查字符串是否為空時(shí)會(huì)使用下面的方法：If Text1.Text = then 執(zhí)行操作End if很不幸，進(jìn)行字符串比較需要的處理量甚至比讀取屬性還要大。因此我建議大家使用下面的方法：If Len(Text1.Text) = 0 then 執(zhí)行操作End if9. 去除 Next 關(guān)鍵字后的變量名在 Next 關(guān)鍵字后加上變量名會(huì)導(dǎo)致代碼的效率下降。我也不知道為什么會(huì)這樣，只是一個(gè)經(jīng)驗(yàn)而已。不過(guò) 我想很少有程序員會(huì)這樣畫(huà)蛇添足，畢竟大多數(shù)程序員都是惜字如金的人。 錯(cuò)誤的代碼For iCount = 1 to 10 執(zhí)行

11、操作Next iCount 正確的代碼For iCount = 1 to 10 執(zhí)行操作Next10. 使用數(shù)組，而不是多個(gè)變量當(dāng)你有多個(gè)保存類(lèi)似數(shù)據(jù)的變量時(shí) ,可以考慮將他們用一個(gè)數(shù)組代替。在VB 中，數(shù)組是最高效的數(shù)據(jù)結(jié)構(gòu)之一。11. 使用動(dòng)態(tài)數(shù)組，而不是靜態(tài)數(shù)組使用動(dòng)態(tài)數(shù)組對(duì)代碼的執(zhí)行速度不會(huì)產(chǎn)生太大的影響，但是在某些情況下可以節(jié)約大量的資源。12. 銷(xiāo)毀對(duì)象無(wú)論編寫(xiě)的是什么軟件，程序員都需要考慮在用戶決定終止軟件運(yùn)行后釋放軟件占用的內(nèi)存空間。但遺憾 的是很多程序員對(duì)這一點(diǎn)好像并不是很在意。正確的做法是在退出程序前需要銷(xiāo)毀程序中使用的對(duì)象。例如：Dim FSO as New FileSy

12、stemObject 執(zhí)行操作 銷(xiāo)毀對(duì)象Set FSO = Nothing 對(duì)于窗體，可以進(jìn)行卸載：Unload frmMain或Set frmMain = Nothing13. 變長(zhǎng)和定長(zhǎng)字符串從技術(shù)上來(lái)說(shuō)，與變長(zhǎng)字符串相比，定長(zhǎng)字符串需要較少的處理時(shí)間和空間。但是定長(zhǎng)字符串的缺點(diǎn)在于 在很多情況下，你都需要調(diào)用 Trim 函數(shù)以去除字符串末的空字符，這樣反而會(huì)降低代碼效率。所以除非是字符 串的長(zhǎng)度不會(huì)變化，否則還是使用變長(zhǎng)字符串。14. 使用類(lèi)模塊，而不是 ActiveX 控件除非 ActiveX 控件涉及到用戶界面，否則盡量使用輕量的對(duì)象，例如類(lèi)。這兩者之間的效率有很大差異。15. 使用

13、內(nèi)部對(duì)象在涉及到使用 ActiveX 控件和 DLL 的時(shí)候，很多程序員喜歡將它們編譯好，然后再加入工程中。我建議你 最好不要這樣做，因?yàn)閺?VB 連接到一個(gè)外部對(duì)象需要耗費(fèi)大量的 CPU 處理能力。每當(dāng)你調(diào)用方法或存取屬性 的時(shí)候，都會(huì)浪費(fèi)大量的系統(tǒng)資源。如果你有 ActiveX 控件或 DLL 的源代碼，將它們作為工程的私有對(duì)象。16. 減少模塊的數(shù)量 有些人喜歡將通用的函數(shù)保存在模塊中，對(duì)于這一點(diǎn)我表示贊同。但是在一個(gè)模塊中只寫(xiě)上二三十行代碼就有些可笑了。如果你不是非常需要模塊，盡量不要使用它。這樣做的原因是因?yàn)橹挥性谀K中的函數(shù)或變量 被調(diào)用時(shí)， VB 才將模塊加載到內(nèi)存中；當(dāng) VB

14、應(yīng)用程序退出時(shí)，才會(huì)從內(nèi)存中卸載這些模塊。如果代碼中只有 一個(gè)模塊， VB 就只會(huì)進(jìn)行一次加載操作，這樣代碼的效率就得到了提高；反之如果代碼中有多個(gè)模塊， VB 會(huì) 進(jìn)行多次加載操作，代碼的效率會(huì)降低。17. 使用對(duì)象數(shù)組當(dāng)設(shè)計(jì)用戶界面時(shí)，對(duì)于同樣類(lèi)型的控件，程序員應(yīng)該盡量使用對(duì)象數(shù)組。你可以做一個(gè)實(shí)驗(yàn)：在窗口上 添加 100 個(gè) PictureBox ，每個(gè) PictureBox 都有不同的名稱(chēng)，運(yùn)行程序。然后創(chuàng)建一個(gè)新的工程，同樣在窗口上添 加 100 個(gè) PictureBox ，不過(guò)這一次使用對(duì)象數(shù)組，運(yùn)行程序，你可以注意到兩個(gè)程序加載時(shí)間上的差別。18. 使用 Move 方法在改變對(duì)象

15、的位置時(shí)，有些程序員喜歡使用Width , Height, Top和Left屬性。例如：Image1.Width = 100Image1.Height = 100Image1.Top = 0Image1.Left = 0實(shí)際上這樣做效率很低，因?yàn)槌绦蛐薷牧怂膫€(gè)屬性，而且每次修改之后，窗口都會(huì)被重繪。正確的做法是使用 Move 方法：Image1.Move 0,0,100,10019. 減少圖片的使用圖片將占用大量?jī)?nèi)存，而且處理圖片也需要占用很多 CPU 資源。在軟件中，如果可能的話，可以考慮用背 景色來(lái)替代圖片 - 當(dāng)然這只是從技術(shù)人員的角度出發(fā)看這個(gè)問(wèn)題。20. 使用 ActiveX DLL

16、 ，而不是 ActiveX 控件如果你設(shè)計(jì)的 ActiveX 對(duì)象不涉及到用戶界面，使用 ActiveX DLL 。21. 使用類(lèi)可以提高軟件的整體性能VB 提供的機(jī)制不完全支持面向?qū)ο蟮脑O(shè)計(jì)和編碼，但是 VB 提供了簡(jiǎn)單的類(lèi)。大多數(shù)人認(rèn)為使用對(duì)象將導(dǎo)致 代碼的效率降低。對(duì)于這一點(diǎn)我個(gè)人有些不同的意見(jiàn)；考察代碼的效率不能純粹從運(yùn)行速度的角度出發(fā)，軟件 占用的資源也是需要考慮的因素之一。使用類(lèi)可以幫助你在整體上提升軟件的性能。22. 盡可能使用常數(shù) 使用常數(shù)可以加快應(yīng)用程序的運(yùn)行，增強(qiáng)代碼的可讀性，而且易于維護(hù)。如果代碼中的字符串或數(shù)字是不變 的，則可把它們聲明為常數(shù)。常數(shù)在編譯時(shí)只處理一次，將

17、適當(dāng)?shù)闹祵?xiě)進(jìn)代碼；而變量在每次運(yùn)行應(yīng)用程序時(shí) 都要讀取當(dāng)前值。盡量使用對(duì)象瀏覽器中列舉的內(nèi)部常數(shù)，而不要自己去創(chuàng)建。不要擔(dān)心應(yīng)用程序中引用的模塊包含多余的常 數(shù)；多余的常數(shù)在形成 .exe 文件時(shí)被刪除。23. 用 ByVal 傳遞參數(shù)，而不用 ByRef編寫(xiě)含參數(shù)的 Sub 或 Function 過(guò)程時(shí)，按值 (ByVal) 傳遞參數(shù)比按地址 (ByRef) 快。盡管 Visual Basic 中參數(shù)傳 遞的缺省方式是按地址的 (ByRef) ，但實(shí)際上需要改變參數(shù)值的過(guò)程極少。如果過(guò)程中不需改變參數(shù)的值，就可 以按值 (ByVal) 來(lái)傳遞，舉例說(shuō)明如下：Private Sub DoSom

18、ething(ByVal strName As String, _ByVal intAge As Integer)24. 使用類(lèi)型確定的可選參數(shù)使用 Visual Basic 5.0 中類(lèi)型確定的可選參數(shù)，可以提高 Sub 或 Function 的調(diào)用速度。 Visual Basic 以前版本中的 可選參數(shù)只能是 Variant 的。如果過(guò)程是按值傳遞參數(shù)的，正如下面的例子， 16 個(gè)字節(jié)的 Variant 變量保存在堆 棧中。Private Sub DoSomething(ByVal strName As String, _Optional ByVal vntAge As Variant,

19、_Optional ByVal vntWeight As Variant)使用類(lèi)型確定的可選參數(shù)，每次調(diào)用時(shí)占用的堆?？臻g較少，而且傳遞到內(nèi)存中的數(shù)據(jù)也較少：Private Sub DoSomething(ByVal strName As String, _ Optional ByVal intAge As Integer, _Optional ByVal intWeight As Integer)類(lèi)型確定的可選參數(shù)的訪問(wèn)速度比 Variant 快，而且一旦數(shù)據(jù)類(lèi)型錯(cuò)誤，編譯時(shí)就顯示錯(cuò)誤信息25 利用集合的優(yōu)點(diǎn)可以定義和使用對(duì)象的集合是 Visual Basic 的強(qiáng)大功能之一。盡管集合是非常

20、有用的，但還要正確使用才能獲得 最好的效果：使用 For Each.Next 替代 For.Next 。26. 添加集合的對(duì)象時(shí)避免使用 Before 和 After 參數(shù)。使用鍵集而不用幾組相同對(duì)象的數(shù)組。集合可以用 For.Next 循環(huán)進(jìn)行迭代。但采用 For Each.Next 可讀性 更好，而且多數(shù)情況下更快。 For Each.Next 是由集合的生成器實(shí)現(xiàn)迭 代的，所以實(shí)際的 操作速度將隨集合對(duì)象的不同而改變。由 于 For Each.Next 的最簡(jiǎn)單的實(shí)現(xiàn)機(jī)理就是 For.Next 的線性迭代，因此 For Each.Next 不會(huì)比 For.Next 慢。但 是，有些情況下

21、采用了比線性迭代更復(fù)雜的實(shí)現(xiàn)機(jī)理，所以For Each.Next 要快得多。如果沒(méi)有使用 Before 和 After 參數(shù)，則往集合中添加對(duì)象是非?？斓摹７駝t， Visual Basic 必須在集合中檢測(cè)到 其它對(duì)象后，才能添加新對(duì)象。如果對(duì)象的類(lèi)型都一樣，集合或數(shù)組都可以用來(lái)管理這些對(duì)象（如果對(duì)象的類(lèi)型不一樣，則只能用集合）。從 速度的觀點(diǎn)看，選擇何種方式取決于對(duì)象的訪問(wèn)方式。如果能夠?yàn)槊恳粚?duì)象分配唯一的鍵，則集合是訪問(wèn)對(duì)象 的最快方式。使用鍵從集合中檢索對(duì)象比從數(shù)組中順序遍歷對(duì)象快。當(dāng)然，如果沒(méi)有鍵而要遍歷對(duì)象時(shí)，則選 擇數(shù)組比較好。就順序遍歷方式而言，數(shù)組比集合快。如果對(duì)象的個(gè)數(shù)少，則

22、數(shù)組使用的內(nèi)存小，并且搜索的速度快。當(dāng)對(duì)象的個(gè)數(shù)在 100 左右時(shí)，集合比數(shù)組的效 率高；當(dāng)然，具體的數(shù)目還有賴(lài)于微處理器的速度和可用的內(nèi)存。26. 不要用 Do While Not record.EOF 語(yǔ)句。例如下面的代碼比較慢：Do While Not record.EOF 代碼record.MoveNextLoop下面的要快好多Record.MoveLastintCount=Record.RecordCountRecord.MoveFirstFor i=1 To intCount 代碼Records.MoveNextNext i第二部分 編譯優(yōu)化我所見(jiàn)過(guò)的很多 VB 程序員從來(lái)沒(méi)有使用

23、過(guò)編譯選項(xiàng)，也沒(méi)有試圖搞清楚各個(gè)選項(xiàng)之間的差別。下面讓我 們來(lái)看一下各個(gè)選項(xiàng)的具體含義。1. P-代碼(偽代碼)和本機(jī)代碼你可以選擇將軟件編譯為 P-代碼或是本機(jī)代碼。缺省選項(xiàng)是本機(jī)代碼。那什么是P-代碼和本機(jī)代碼呢？P-代碼：當(dāng)在VB中執(zhí)行代碼時(shí)，VB首先是將代碼編譯為 P-代碼，然后再解釋執(zhí)行編譯好的P-代碼。在編譯環(huán)境下，使用這種代碼要比本機(jī)代碼快。選擇PH弋碼后，編譯時(shí) VB將偽代碼放入一個(gè) EXE文件中。本機(jī)代碼：本機(jī)代碼是VB6以后才推出的選項(xiàng)。當(dāng)編譯為EXE文件后，本機(jī)代碼的執(zhí)行速度比P-代碼快。選擇本機(jī)代碼后，編譯時(shí) VB 使用機(jī)器指令生成 EXE 文件。在使用本機(jī)代碼進(jìn)行編譯

24、時(shí)，我發(fā)現(xiàn)有時(shí)候會(huì)引入一些莫名其妙的錯(cuò)誤。在編譯環(huán)境中我的代碼完全正確 地被執(zhí)行了，但是用本機(jī)代碼選項(xiàng)生成的 EXE 文件卻不能正確執(zhí)行。通常這種情況是在卸載窗口或彈出打印窗 口時(shí)發(fā)生的。我通過(guò)在代碼中加入 DoEvent 語(yǔ)句解決了這個(gè)問(wèn)題。當(dāng)然出現(xiàn)這種情況的幾率非常少，也許有些 VB 程序員從來(lái)沒(méi)有遇到過(guò)，但是它的確存在。在本機(jī)代碼中還有幾個(gè)選項(xiàng)：a) 代碼速度優(yōu)化：該選項(xiàng)可以編譯出速度較快的執(zhí)行文件，但執(zhí)行文件比較大。推薦使用b) 代碼大小優(yōu)化：該選項(xiàng)可以編譯出比較小的執(zhí)行文件，但是以犧牲速度為代價(jià)的，不推薦使用。c) 無(wú)優(yōu)化：該選項(xiàng)只是將 P-代碼轉(zhuǎn)化為本機(jī)代碼，沒(méi)有做任何優(yōu)化。在調(diào)試代碼時(shí)可以使用。d) 針對(duì) Pentium Pro