Question

怎么将一个C程序生成DLL供VB调用

比如一个简单的C程序，主函数的传入参量为两个整数，经过运算后输出一个整数。
现在想要在VB中的两个TEXT框中输入两个整数，然后单击按钮调用C程序（以TEXT框中的两个整数为参数传入），之后在一个LABEL框中输出运算的结果

Answer 1

用VC新建一个MFC dll工程或者win32 dynamic link library工程，把你的函数写在里面，函数声明注意加上_stdcall修饰就可以了。具体怎么写动态库你随便度娘一下吧。

追问

貌似MFC dll用的语言是C++吧，怎么做C语言的DLL呢？

追答

MFC你用C写也是没问题的
干脆代码给你
cpp文件的
#include "stdafx.h"
#include "dll2.h" //改成你自己的头文件

short _stdcall MyAdd(int i, int j)
{
return i+j;
}
头文件
#include "resource.h" // main symbols

short _stdcall MyAdd(int i, int j);

def文件最后加一行
MyAdd;

追问

#include "resource.h" 这句编译不通过，说是没有这个文件
另外即使声明过了以后，在VB调用的时候还是显示找不到入口函数MyAdd

追答

用MFC做的工程才有 #include "resource.h" 。
你VB的声明可能有问题。

追问

Private Declare Function MyAdd Lib "C:\MyAdd.dll" Alias "MyAdd" (ByVal i As Long, ByVal j As Long) As Integer
在VB是这样声明的

追答

看起来没问题啊。我写个VB程序试试

追问

是不是和文件编码有关系呢？好像VC6是ASCii编码然后VB是Unicode

追答

看起来没问题啊。我写个VB程序试试

验证通过，代码如下
Private Declare Function MyAdd Lib "C:\MyAdd.dll" (ByVal i As Long, ByVal j As Long) As Integer

Private Sub Command1_Click()
Dim i As Integer
i = MyAdd(1, 2)
MsgBox Str(i)
End Sub

你的问题可能在于"C:\MyAdd.dll"，绝对路径看看有没错，还有动态库名是识别大小写的，有没写错了。

追问

太感谢了！我知道是怎么回事了，我是用VC6的win32 dynamic link library工程建立的，换成MFC dll工程就可以了。不过这两个对于用VB调用来说有什么区别吗？如果用win32 dynamic link library工程建立应该怎么做呢？因为好像没有def文件。谢谢！

追答

def文件win32 dynamic link library工程不会自动提供，你可以手动添加，添加完是一样的。