不正確地調(diào)用Windows應(yīng)用程序接口可能會(huì)產(chǎn)生一些意想不到的副作用，以及潛在地對(duì)一個(gè)應(yīng)用程序的代碼及數(shù)據(jù)段的破壞。正確地使用一個(gè)空的32位指針在MicrosoftAccess中是十分必要的。

當(dāng)對(duì)表格和報(bào)表進(jìn)行操作時(shí)，MicrosoftAccess有一個(gè)無(wú)正式文本的特性。這個(gè)特性允許你從設(shè)計(jì)視窗性質(zhì)sheetwindow中進(jìn)行過(guò)程調(diào)用，調(diào)用的方法是同時(shí)按下shift和F2鍵。
MicrosoftAccessBasic提供了一個(gè)豐富的開(kāi)發(fā)環(huán)境。這個(gè)開(kāi)發(fā)環(huán)境給你足夠的靈活性和對(duì)MicrosoftWindows應(yīng)用程序接口的控制，同時(shí)保護(hù)你使你免遭用高級(jí)或低級(jí)語(yǔ)言開(kāi)發(fā)環(huán)境開(kāi)發(fā)時(shí)所碰到的各種麻煩。不過(guò)，許多優(yōu)化、有效數(shù)據(jù)和模塊化方面只能是應(yīng)用程序設(shè)計(jì)者才能使用。開(kāi)發(fā)者應(yīng)致力于謹(jǐn)慎地使用算法。除了一般的程序設(shè)計(jì)概念，還有一些特別的存儲(chǔ)空間的管理技術(shù)，正確使用這些技術(shù)可以提高應(yīng)用程序的執(zhí)行速度，減少應(yīng)用程序所要好的存儲(chǔ)資源，提高速度和減少代碼量。

你可以用幾種技巧來(lái)提高你的編碼速度，但是卻找不到有效的算法的替代者。接下來(lái)的幾點(diǎn)建議可以提高你的編碼速度同時(shí)又減少你的應(yīng)用程序消耗的存儲(chǔ)空間。
使用整形數(shù)據(jù)類型進(jìn)行數(shù)學(xué)運(yùn)算

即使MicrosoftAccess會(huì)使用一個(gè)聯(lián)合處理器來(lái)處理浮點(diǎn)型算術(shù)，整型數(shù)算術(shù)也總是要快一些。當(dāng)你的計(jì)算不含有小數(shù)，盡量使用整型或長(zhǎng)整型而不是變量或雙整型。整型除法同樣也要比浮點(diǎn)除法要快。在使用其他一些有效的數(shù)據(jù)類型時(shí)會(huì)警告：沒(méi)有任何東西可以替換有效的運(yùn)算法則。

避免使用過(guò)程調(diào)用

避免在循環(huán)體中使用子程序或函數(shù)調(diào)用。每一次調(diào)用都因額外的工作和時(shí)間而給編碼增大了負(fù)擔(dān)。每一次調(diào)用都要求把函數(shù)的局部變量和參數(shù)壓棧，而棧的大小是固定的，不能隨便加大，并且同時(shí)還要于MicrosoftAccess共享。

謹(jǐn)慎使用不定長(zhǎng)數(shù)據(jù)類型

不定長(zhǎng)數(shù)據(jù)類型提供了更大的靈活性，比如說(shuō)允許正確處理空值和自動(dòng)處理溢出。另外這種數(shù)據(jù)類型比傳統(tǒng)的數(shù)據(jù)類型要大并消耗更多的存儲(chǔ)空間。前面還曾經(jīng)提到過(guò)，不定長(zhǎng)數(shù)據(jù)類型的變量在數(shù)學(xué)計(jì)算中比較慢。

用變量存放經(jīng)常使用的屬性

對(duì)變量進(jìn)行查找和設(shè)置都比對(duì)屬性進(jìn)行這些操作要快。如果你要得到或查閱一個(gè)屬性值許多次，那么把這個(gè)屬性分配給一個(gè)變量，并用這個(gè)變量來(lái)代替屬性，那么你的代碼將要運(yùn)行快得多。例如，在一個(gè)循環(huán)中，你查閱某表格中得一個(gè)控制的屬性，那么在循環(huán)外把屬性分配給一個(gè)變量，然后在循環(huán)中用查詢一個(gè)變量來(lái)代替查閱一個(gè)屬性的方法要比較快。

預(yù)載表格

當(dāng)你的應(yīng)用程序啟動(dòng)并且把它們的可見(jiàn)屬性設(shè)置位‘false’時(shí)，如果你安裝了你所有的表格，那么你的應(yīng)用程序的性能會(huì)讓你感覺(jué)挺快。當(dāng)你需要顯示一個(gè)表格時(shí)，你只需要把該表格的可見(jiàn)屬性設(shè)置為‘true’，這要比安裝一個(gè)表格要快得多。需要記住的是，為你安裝的每個(gè)表格，你都要從應(yīng)用程序的全局堆中消耗存儲(chǔ)空間。

AccessBasic中的陷阱

在AccessBasic中經(jīng)常碰到的陷阱是對(duì)動(dòng)態(tài)連接庫(kù)（DLLS）中的外部過(guò)程的調(diào)用。當(dāng)你提供程序給你的用戶，調(diào)用外部動(dòng)態(tài)鏈接庫(kù)時(shí)將出現(xiàn)使用警告；否則，你將得到一條錯(cuò)誤信息：試圖用相同的函數(shù)定義安裝模塊。

使用唯一的別名

在AccessBasic中，如果你知道入口點(diǎn)（動(dòng)態(tài)鏈接庫(kù)中函數(shù)的名字），你可以調(diào)用動(dòng)態(tài)鏈接庫(kù)中的外部函數(shù)。不過(guò)，使用這一方法的限制性在于你只能聲明外部函數(shù)一次。如果你安裝了調(diào)用了你的模塊調(diào)用的相同的Windows應(yīng)用程序接口，你不會(huì)得到一個(gè)不為人所知的錯(cuò)誤：試圖用相同的函數(shù)定義安裝模塊。

你嘗試安裝的模塊要么是包含有相同的函數(shù)名，要么是包含在已存在的模塊中有的過(guò)程名。刪除這些過(guò)程，在EDIT菜單中使用FIND命令找到重復(fù)的過(guò)程名，要解決這一問(wèn)題，你需要使用一種叫做“別名使用“的技術(shù)。這種技術(shù)允許你給你的過(guò)程一個(gè)獨(dú)一無(wú)二的名字。但是，你選擇的別名也有可能不是獨(dú)一無(wú)二的，所以要使你取的名字唯一，你可以用初始值和下劃線優(yōu)先聲明你所有從動(dòng)態(tài)鏈接庫(kù)中調(diào)用的過(guò)程，比如，聲明getActiveWindow為：Declarebcb_GetActiveWindowLibKernelAliasGetActiveWindow()AsInteger.如何傳遞一個(gè)空指針給動(dòng)態(tài)鏈接庫(kù)一個(gè)空的32位指針是有效的或是為一些動(dòng)態(tài)鏈接庫(kù)要求具有參數(shù)。要指定一個(gè)空值，使用0&。當(dāng)你的函數(shù)調(diào)用一個(gè)過(guò)程并傳遞一個(gè)表達(dá)式0&，“&”指定一個(gè)32位的空指針，在函數(shù)聲明中，一個(gè)ASANY參數(shù)指示AccessBasic對(duì)那個(gè)參數(shù)不進(jìn)行類型檢查，同時(shí)把值傳遞到被調(diào)用的函數(shù)。下面的編碼示范了一個(gè)正確的方法，告訴你如何聲明一個(gè)給動(dòng)態(tài)鏈接庫(kù)中的過(guò)程傳遞一個(gè)空指針參數(shù)的AccessBasic函數(shù)。這段聲明了WriteProfileString應(yīng)用程序接口函數(shù)。這個(gè)函數(shù)來(lái)自于外部Windows動(dòng)態(tài)鏈接庫(kù)“kernel。DeclareFunctionWriteProfileStringLibKernel(ByVallpApplicationNameAsAny,ByVallpKeyNameAsAny,ByVallpStringAsAny)接下來(lái)的函數(shù)調(diào)用了一個(gè)外部過(guò)程，位每個(gè)參數(shù)指定一個(gè)空值。這將使WriteProfileString充滿它的內(nèi)部高速緩沖區(qū)，并且WIN.INI的任何變化寫到磁盤上。重要的對(duì)這個(gè)函數(shù)不正確的使用會(huì)引起一般性的保護(hù)故障或修改你的WIN.INI文件。

Functionn
FlushIniCache()nFlushIniCache=WriteProfileString(0&,0&,0&)
EndFunction

如何從動(dòng)態(tài)鏈接庫(kù)中傳遞和接收無(wú)符號(hào)整型數(shù)

常常有這樣一種情況，要從外部動(dòng)態(tài)鏈接庫(kù)調(diào)用的過(guò)程中返回一個(gè)兩個(gè)字節(jié)長(zhǎng)的無(wú)符號(hào)整型數(shù)。然而AccessBasic不支持這種數(shù)據(jù)類型。正確地計(jì)算這種數(shù)據(jù)類型需要把它從一個(gè)無(wú)符號(hào)整型數(shù)轉(zhuǎn)換程AccessBasic長(zhǎng)數(shù)據(jù)類型。

AccessBasic整型數(shù)的范圍使從-32768到32767。一個(gè)無(wú)符號(hào)整型數(shù)的范圍是從0到65535。AccessBasic用最明顯的一位來(lái)放置數(shù)值的符號(hào)位，所以當(dāng)數(shù)值超過(guò)32767，第16位將被置成負(fù)數(shù)符號(hào)。要計(jì)算一個(gè)無(wú)符號(hào)整型數(shù)，你必須人工調(diào)整第16位。

從無(wú)符號(hào)整型數(shù)轉(zhuǎn)換到AccessBasic長(zhǎng)整型數(shù)或從AccessBasic的長(zhǎng)整型轉(zhuǎn)換成無(wú)符號(hào)整型數(shù)有兩種方法。第一種方法用到了最基本的數(shù)學(xué)運(yùn)算（65535被無(wú)符號(hào)整型值加或減）。第二種方法使用Bitwise操作。實(shí)際上，算術(shù)方法和Bitwise方法工作起來(lái)效果一樣，只不過(guò)，算術(shù)方法可能可讀性更強(qiáng)一些，而B(niǎo)itwise方法在執(zhí)行時(shí)可能更快一些。

算術(shù)方法

下面的lArithUintToInt(nUint)和lArithIntToUnint(lBytes)過(guò)程示范了如何使用轉(zhuǎn)換無(wú)符號(hào)整型數(shù)的算術(shù)方法。第一個(gè)函數(shù)讀進(jìn)一個(gè)無(wú)符號(hào)整型數(shù)同時(shí)返回一個(gè)已經(jīng)轉(zhuǎn)變位長(zhǎng)整型的值。第二個(gè)函數(shù)讀入一個(gè)長(zhǎng)整型值，然后返回一個(gè)轉(zhuǎn)變成無(wú)符號(hào)整型的值。

Function
lArithUintToInt(nUintAsInteger)
IfnUint<0Then

lArithUintToInt=nUint 65536Else

lArithUintToInt=nUintEndIfEndFunctionFunctionnArithIntToUnint(lBytesAsLong)

IflBytes>32767Then

nArithIntToUnint=lBytes-65536Else

nArithIntToUnint=lBytes
EndIf
EndFunction

按位操作方法

下面的nBWUintToInt(lBytes)和lBWIntToUint(nUint)過(guò)程示范了如何使用Bitwise方法轉(zhuǎn)換無(wú)符號(hào)整型數(shù)。第一個(gè)函數(shù)讀進(jìn)一個(gè)無(wú)符號(hào)整型數(shù)，然后返回一個(gè)已經(jīng)轉(zhuǎn)換成長(zhǎng)整型的值。第二個(gè)函數(shù)讀入一個(gè)長(zhǎng)整型值，然后返回一個(gè)已經(jīng)轉(zhuǎn)換的無(wú)符號(hào)整型值。第二個(gè)函數(shù)中使用了提示框的語(yǔ)句是為了防止當(dāng)傳遞到函數(shù)的值大于64KB時(shí)會(huì)出現(xiàn)溢出信息。

1010001111100000(-23584)

AND1111111111111111(FFFF&)

1010001111100000(41952)
Thefunctionsfollow:
Function
lBWIntToUint(nUintAsInteger)lBWInt
ToUint=nUintAnd&HFFFF&
EndFunction

FunctionnBWUintToInt(lBytesAsLong)DimnTempAsInteger
IflBytes>65535Then

MsgBoxYoupassedavaluelargerthan65535

ExitFunction
EndIf
nTemp=lBytesAnd&H7FFFnBWUintToInt=nTempOr-(lBytesAnd&H8000)
EndFunction
注意：&HFFFF&要求“&”在16進(jìn)制數(shù)的末尾。這樣能保證32位的16進(jìn)制數(shù)通過(guò)16位的值表示出來(lái)。

AccessBasic中的技巧

在MicrosoftAccess中有一些以前無(wú)正式文本的特性，它們?cè)试S你指定過(guò)程，這個(gè)過(guò)程是從一個(gè)from或report的屬性工作表窗中調(diào)用的。要進(jìn)入最小窗口，只需要同時(shí)按下SHIFT和F2鍵。

BUILDERFORM函數(shù)

如果在一個(gè)模塊中一個(gè)函數(shù)的定義是以“BuilderrForm開(kāi)始同時(shí)包含一個(gè)類似于Onclose屬性或事件標(biāo)識(shí)符，按下SHIFT和F2鍵就可以調(diào)用這個(gè)過(guò)程。例如，當(dāng)你在一個(gè)form的設(shè)計(jì)窗口中，而當(dāng)前的光標(biāo)落在屬性窗口中的Onclose事件的編輯控制上，按下SHIFT和F2鍵將能調(diào)用BuilderFormOnclose函數(shù)。這使用于form和reports的大部分屬性和所有事件。下面的代碼將說(shuō)明函數(shù)的格式：FunctionBuilderFormOnClose(szFormNameAsString,szControlNameAsString,

szCurrentValueAsString,szReservedAsString)IfszCurrentValue=Then

DoCmdSelectObjectA_MACRO,,True

SendKeys%n%fs&NewMacro&Enter

Forms(szFormName).OnClose=NewMacroElse

DoCmdSelectObjectA_MACRO,szCurrentValue,True

SendKeys