用FREEBASIC写标准DLL
用BASIC写标准DLL已经不是天方夜谭了!不多说了,看:
新建一个BAS文件,建立一个函数:
[code]function AddNumbers ( byval operand1 as integer, byval operand2 as integer ) as integer export
function = operand1 + operand2
end function[/code]
可以注意到,和一般建立的函数不一样的地方,函数的类型后面带了一个export,它的意思就是告诉编译器输出成标准DLL。编译的时候要记得带上-dll这个参数:
fbc -dll 文件名.bas
用FREEBASIC编译后,我们可以得到一个标准DLL,如何调用呢?
我们需要先建立一个BI文件(FREEBASIC的头文件)内容为:
[code]declare function AddNumbers lib "mydll" alias "AddNumbers" ( byval operand1 as integer, byval operand2 as integer ) as integer[/code]
是不是很象VB的模块中的标准DLL调用呢?
然后程序中调用这个BI头文件就可以用函数啦~~这样就解决了VB不能直接写标准DLL的问题了~~
freebasic中文论坛