VB无所不能之五：建立“标准”DLL动态链接库文件（2）
——作者：钟声
博客地址：http://blog.csdn.net/useway
昨天我们讲到，如何通过特殊方法获取OBJ文件，那么今天我们继续讲如何进行编译连接。
昨天的上一篇：http://blog.csdn.net/useway/archive/2010/04/14/5487046.aspx
一、首先我们看看这种特殊方法的操作准备步骤：
步骤一：建立一个假的“Link.exe”;
建立一个新的项目，在那个项目中建立一个“Form”，然后，在“Form”中加入如下代码：
Sub Form_Load()
MsgBox "现在可以拷贝OBJ文件了！！"
End
End Sub
编译为：Link.exe
步骤二：将“C:\Program Files\Microsoft Visual Studio\VB98\Link.exe”改名为“Link2.exe”;
步骤三：将假的那个Link.exe复制到“C:\Program Files\Microsoft Visual Studio\VB98\”中；
二、建立一个ActiveX DLL
步骤一：建立一个新项目，选择“ActiveX DLL”，然后建立一个“Module”在代码中加入如下代码：
Function fun1(ByVal a As Long, ByVal b As Long) As Long
fun1 = a + b
End Function
Function fun2() As Long
fun2 = 1
End Function
步骤二：建立一个空的“Class” ;
步骤三：用VB菜单编译;
步骤四：复制出OBJ文件;
已知有一个XML文件（bookstore.xml）如下：
<?xml version="1.0" encoding="gb2312"?>
<bookstore>
<book genre="fantasy" ISBN="2-3631-4">
<title>Oberon's Legacy</title>
<author>Corets, Eva</author>
<price>5.95</price>
</book>
< ......
