VB中的DLL……

凡是可以独立的函数都可以放在类模块中，并使其函数为Public
新建Active Dll工程，然后将这个类模块导入其中，并将类设为MulteUse
生成dll即可
在主工程中引用这个DLL
然后，Dim ox as yourDll.ClassSome
Set ox =New yourDll.ClassSome
然后即可以调用函数了，
如：
ox.DoSome par1,par2
更多的请参见：
VB 的帮助:用部件编程。