如何实现vb6和.net的联合调试

今天看到一个问题：“在VB中调用,如何在VB中调试VB.net 开发的DLL呢?”

http://forums.microsoft.com/china/ShowPost.aspx?PostID=4115159&SiteID=15&mode=1

他的想法就是能够在调试的时候进入到DLL的内部。

下面我就来讲解如何实现的

1。用VB.NET创建类库

<bgsound cep="0"><span style="COLOR: #000000">&lt;</span><span style="COLOR: #000000">Runtime.InteropServices.Guid(</span><span style="COLOR: #800000">"</span><span style="COLOR: #800000">A3DD9964-E08F-4956-94D7-8DD69A7765DD</span><span style="COLOR: #800000">"</span><span style="COLOR: #000000">)</span><span style="COLOR: #000000">&gt;</span><span style="COLOR: #000000">_<br></span><span style="COLOR: #0000ff">Public</span><span style="COLOR: #000000"></span><span style="COLOR: #0000ff">Interface</span><span style="COLOR: #000000">iTest<br></span><span style="COLOR: #0000ff">Sub</span><span style="COLOR: #000000">TestMethod()<br></span><span style="COLOR: #0000ff">EndInterface</span><span style="COLOR: #000000"><br><br></span><span style="COLOR: #000000">&lt;</span><span style="COLOR: #000000">Runtime.InteropServices.Guid(</span><span style="COLOR: #800000">"</span><span style="COLOR: #800000">A3DD9964-E08F-4956-94D7-8DD69A7765DE</span><span style="COLOR: #800000">"</span><span style="COLOR: #000000">)</span><span style="COLOR: #000000">&gt;</span><span style="COLOR: #000000">_<br></span><span style="COLOR: #0000ff">Public</span><span style="COLOR: #000000"></span><span style="COLOR: #0000ff">Class</span><span style="COLOR: #000000">Test<br></span><span style="COLOR: #0000ff">Implements</span><span style="COLOR: #000000">iTest<br><br></span><span style="COLOR: #0000ff">Public</span><span style="COLOR: #000000"></span><span style="COLOR: #0000ff">Sub</span><span style="COLOR: #000000">TestMethod()</span><span style="COLOR: #0000ff">Implements</span><span style="COLOR: #000000">iTest.TestMethod<br></span><span style="COLOR: #0000ff">MsgBox</span><span style="COLOR: #000000">(</span><span style="COLOR: #800000">"</span><span style="COLOR: #800000">HelloWorld!</span><span style="COLOR: #800000">"</span><span style="COLOR: #000000">)<br></span><span style="COLOR: #0000ff">EndSub</span><span style="COLOR: #000000"><br><br></span><span style="COLOR: #0000ff">EndClass</span></bgsound>

编译，记得在项目属性的“编译”选项卡里选中“为 COM Interop 注册”复选框

2。用VB6创建测试工程

引用上面编译好的DLL,编写代码

<bgsound cep="1"><span style="COLOR: #0000ff">Dim</span><span style="COLOR: #000000">cls</span><span style="COLOR: #0000ff">As</span><span style="COLOR: #000000">ClassLibrary1.iTest<br></span><span style="COLOR: #0000ff">Set</span><span style="COLOR: #000000">cls</span><span style="COLOR: #000000">=</span><span style="COLOR: #000000"></span><span style="COLOR: #0000ff">New</span><span style="COLOR: #000000">ClassLibrary1.Test<br>cls.TestMethod<br></span></bgsound>

保存成project1.vbp并退出

3。设置调式信息

打开类库项目属性的“调试”选项卡，设置“启动操作”为“启动外部程序”，指定为VB6.EXE的位置。

设置“启动选项”中“命令行参数”为Project1.vbp, “工作目录”为Project1.vbp所在目录。如图

4。调试DLL

万事俱备。现在我们在MsgBox("Hello World!")打上断点，运行类库。你会发现VB6自动打开了，并且加载了project1.vbp.

执行VB6代码，哈哈，程序已经停在断点处，开始调试吧！