vb调用vc dll

最新推荐文章于 2012-10-30 10:57:11 发布

原创最新推荐文章于 2012-10-30 10:57:11 发布 · 2.7k 阅读

2 ·

CC 4.0 BY-SA版权

文章标签：

#vb #dll #library #function #c

本文介绍如何在VC中创建一个DLL文件，并通过VB程序调用来实现两个整数的最大值和最小值比较功能。具体步骤包括：创建DLL工程、定义导出函数、声明函数原型及在VB中调用。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

功能：比较两数大小。

在VC中新建一个Win32 Dynamic-Link Library工程，DLL类型选“A DLL that exports some symbols”。把.cpp文件内容全部改成

#include "XXX.h"
int __stdcall Max(int a, int b)
{
if(a>=b)return a;
else
return b;
}
int __stdcall Min(int a, int b)
{
if(a>=b)return b;
else
return a;
}
(XXX为工程名;__stdcall表示在VB中调用DLL的方式 )

在Source Files文件夹下新建XXX.def文件，内容：

LIBRARY XXX
EXPORTS Max

EXPORTS Min

将XXX.h文件内容全部改为：

extern "C" _declspec(dllexport) int __stdcall Max(int a, int b);
extern "C" _declspec(dllexport) int __stdcall Min(int a, int b);
然后，compile--rebuild all,在生成的Release文件夹下找到XXX.dll和XXX.lib两个文件，将它们拷贝到你建立的VB工程目录下，在VB的Form_load程序里输入：

Option Explicit
Private Declare Function Max Lib ".../.../.../XXX.dll" (ByVal a As Long, ByVal b As Long) As Long
    Private Sub Form_Load()
    Dim c As Long
    c = Max(7, 8)
    Text1.Text = c
    End Sub
其中，".../.../.../XXX.dll"是包括盘符在内的XXX.dll文件的完整路径。

运行这个VB程序，在text1文本框内显示“8”。