Cita:  
					Iniciado por LeandroA  felizitaciones por el aporte VisualGuallabo, Como haces para compilar?
     Lo que tienes que aser  es crear un proyecto DLL ActiveX.
eL MODULO DE CLASE LOS DEJAS COMO ESTA. Y EN UN MODULO publicas las funciones que quieres que tengan las dll.  
el ejemplo de Ron en el modulo.  
 Cita:  
					Iniciado por Codigo  Option Explicit
 
Public Function Increment(var As Integer) As Integer
   If Not IsNumeric(var) Then Err.Raise 5
 
   Increment = var + 1
End Function
 
Public Function Decrement(var As Integer) As Integer
   If Not IsNumeric(var) Then Err.Raise 5
 
   Decrement = var - 1
End Function
 
Public Function Square(var As Long) As Long
   If Not IsNumeric(var) Then Err.Raise 5
 
   Square = var ^ 2
End Function
    luego carga el proyecto con mi programa.
marca el modulo y luego las funciones oprocedimientos que quieres exportar.
Recuerda buscar la ruta donde se encuentra el exe de Vb en caso de Vb6(Vb6.exe)
y luego manda a compilar la dll te la creara en el directorio del proyecto.
luego la llamas con Declare como a las api de windows. 
Te recomiendo que leas los articulos que menciono en la faq'