在中通过相对路径引用标准覆盖

很长时间以来，都认为只能通过绝对路径引用标准DLL中的函数。其实，你也可以用相对路径。很简单的，现在就尝试一下吧。

1）绝对路径方法

比如你的DLL文件位于c:\\testDLL\\debug\\l

一般来说，你需要在VB中作如下声明

Declare Sub mytest Lib \"c:\\testDLL\\dubug\\l\" (ByVal x As Long)

另外的一个变通方法是把l放在windows的系统目录下，这样，你就可以直接引用文件名了。不过，需要把一个文件放到windows系统目录下，很是不爽！

2）相对路径方法

看看我们如何用相对路径，假设你的DLL文件位于c:\\testDLL\\debug\\l，你的VB程序位于目录c:\\testDLL\\vbClient

你可以在VB程序中作如下声明：

Declare Sub mytest Lib \"../dubug/l\" (ByVal x As Long)

如果直接运行你的VB程序，系统会提示错误：找不到../dubug/l.

为了使上面的声明其作用，先暂时关闭你的VB工程。然后用一个文本器(notepad,editplus,etc)打开工程文件（就是那个后缀是vbp的家伙），通常vbp文件由几个部分组成，比如我的vbp有两部分：

Type=Exe

Reference=*\\G{-C}#2.0#0#..\\..\\..\\..\\WINDOWS\\System32\\b#OLE Automation

Form=m

Module=Module1; s

Startup=\"Form1\"

ExeName32=\"e\"

Command32=\"\"

Name=\"Project1\"

HelpContextID=\"0\"

CompatibleMode=\"0\"

MajorVer=1

MinorVer=0

RevisionVer=0

AutoIncrementVer=0

ServerSupportFiles=0

VersionCompanyName=\"American Standard\"

CompilationType=0

OptimizationType=0

FavorPentiumPro(tm)=0

CodeViewDebugInfo=0

NoAliasing=0

BoundsCheck=0

OverflowCheck=0

FlPointCheck=0

FDIVCheck=0

UnroundedFP=0

StartMode=0

Unattended=0

Retained=0

ThreadPerObject=0

MaxNumberOfThreads=1

[MS Transaction Server]

AutoRefresh=1

你要做的就是在第一部分MaxNumberofThreads=1后添加一行DebugStartupOption=0。这样，vbp文件就会像下面这样：

......（前面的都一样，故省略）

ThreadPerObject=0

MaxNumberOfThreads=1

DebugStartupOption=0

由于第二季度开始 [MS Transaction Server]

AutoRefresh=1

at\'s all!!重新用VB开发环境打开你的工程然后运行。奇迹发生了吧！查看本文来源