[今天的编程日记, 在vb中使用vc编译的dll实例]

18:07 2003-12-3
今天，仿照着书，我使用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;导出函数的名字

代码
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

代码 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

Copyright ＠ 2007-2012 敏韬网(敏而好学，文韬武略--MinTao.Net)（学习笔记） Inc All Rights Reserved.
闵涛 E_mail:admin@mintao.net(欢迎提供学习资源)

鄂公网安备 42011102001154号

站长：MinTao ICP备案号：鄂ICP备11006601号-18