展开全部
VB6先创建一个ActiveX DLL 工程 TestDll
在里面加上下面的代码
Function Test(str As String) As Boolean
Test = True
MsgBox str
End Function
编译成activex dll即可
这个dll不是基于C++的标准动态链接库,但却是应用开发效率很高的activeX dll,此控件可以被MFC、Delphi、网页上的javascript和vbscript、vc++所调用和使用。
你可以自己用陆谈脊着试试,工程菜单里点引用,用法与其它语言编的activeX dll用法相同。然后写
TestDll.Test "hello world!"
或者
Dim a As TestDll
set a = New TestDll
a.Test "hello world!"
所以楼上说VB6做不到是很不负责任的,毕竟VB在14年以前1996年就能做此事了。早渗尤其现在几乎所有语言都是写面向对象的程序,像vb这种类似activex组件式的程序已被广泛用于C#、VB.Net等。 而标准dll只不过是面向结构化编程的函数库,属于上一代理念或底层开发的使侍简用了。
在里面加上下面的代码
Function Test(str As String) As Boolean
Test = True
MsgBox str
End Function
编译成activex dll即可
这个dll不是基于C++的标准动态链接库,但却是应用开发效率很高的activeX dll,此控件可以被MFC、Delphi、网页上的javascript和vbscript、vc++所调用和使用。
你可以自己用陆谈脊着试试,工程菜单里点引用,用法与其它语言编的activeX dll用法相同。然后写
TestDll.Test "hello world!"
或者
Dim a As TestDll
set a = New TestDll
a.Test "hello world!"
所以楼上说VB6做不到是很不负责任的,毕竟VB在14年以前1996年就能做此事了。早渗尤其现在几乎所有语言都是写面向对象的程序,像vb这种类似activex组件式的程序已被广泛用于C#、VB.Net等。 而标准dll只不过是面向结构化编程的函数库,属于上一代理念或底层开发的使侍简用了。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询