在vb中使用vc编译的dll实例 |
| 作者：佚名 来源：不详 更新：2006-8-25 21:05:35 错误报告 我要投稿 |
今天，仿照着书，我使用vc编了一个动态链接库（dll）－－a.dll,然后将它复制到windows/system/目录下面，之后建立了一个vb程序，并在程序中声明了a.dll中的函数add(),实现两个整形数的加法运算。
实现过程如下：
一、建立dll
打开vc,创建一个基于API的DLL.
---- 1.在FILE- >NEW- >PROJECTS中选择"WIN32 Dynamic-Link Library"在Project Name中输入 "a"按OK
---- 2.在FILE- >NEW- >FILES中选择C++ SOURCE FILE，在FILE中输入a.cpp,按OK
---- 3.在FILE- >NEW- >FILES中选择TEXT文件，在FILE中输入a.h,按OK
---- 4.在FILE- >NEW- >FILES中选择TEXT文件，在FILE中输入a.def,按OK
---- 5.源文件：
| 代码 |
//---------------------------
//a.cpp
#include < windows >
WINAPI int add(int a,int b)
{ return (a+b);
}
//---------------------------
//a.h
WINAPI int add(int a,int b);
//---------------------------
//a.def
LIBRARY "a";指出DLL的名字
DESCRIPTION 'a Windows Dynamic Link Library'
;描述DLL的用途(此句可选)
EXPORTS add;导出函数的名字 |
------6.编译成a.dll
------7.将a.dll复制到windows/system/目录下面
二、建立vb程序
在form1中输入
| 代码 |
Option Explicit
Private Declare Function add Lib "a.dll" (ByVal a As Integer, ByVal b As Integer) As Integer
Private Sub Command1_Click()
Text3.Text = Str(add(Val(Text1.Text), Val(Text2.Text)))
End Sub
|
程序界面如下图： ![user posted image]() 我在编程过程中遇到的问题： 在将a.dll复制到程序目录下之后（此时我没有将a.dll复制到windows/system/目录下面），运行程序，结果报错！如下图： ![user posted image]() 后来我将a.dll复制到E：盘，将
| 代码 |
| Private Declare Function add Lib "a.dll" (ByVal a As Integer, ByVal b As Integer) As Integer改为Private Declare Function add Lib "E:/a.dll" (ByVal a As Integer, ByVal b As Integer) As Integer |
，再次运行程序，也成功了！
不知道这是什么原因，书上说通常调用DLL时所需的DLL文件必须位于以下三个目录之一：
(1)Windows的系统目录：\windows\system；
(2)DOS中path所指出的任何目录；
(3)程序所在的目录。
不知道我在满足第三个条件的情况下，为什么会出错？
=================================================
21:36 2003-12-3
今天晚上，我到图书馆去看书，终于明白了为什么下午的程序会出错了.
最主要的原因是因为按F5执行程序时，程序还是处于调试阶段，所以它找不
到a.dll，想到这里，我把程序MAKE为应用程序，终于一切正常了。真是感到很欣
慰～
==========================
此文最早发在刺客之光网站http://www.thugx.com/main/index.php?showtopic=3250
==========================
|
|
| 文章录入：skyuu 责任编辑：skyuu |
|
| 【字体：小 大】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口】 |
用户登录
