hola erick_arcini
Gracias por reponderme.
Verás , se muy poco de VB y estoy muy perdidom, solo necesito este código para ver si me funciona correctamente generando una dll y luego utilizarla con mis paginas asp.
Las he definido de esta forma pero me dá error: 
Código:
  
Public MultiUse As Integer
Public Persistable As Integer
Public DataBindingBehavior As Integer
Public MTSTransactionMode As Integer
 Public DataSourceBehavior As Integer
 MultiUse = -1  'True
 Persistable = 0  'NotPersistable
 DataBindingBehavior = 0  'vbNone
 DataSourceBehavior = 0   'vbNone
  MTSTransactionMode = 0   'NotAnMTSObject
  
  ERROR EL PROCEDIMIENTO EXTERNO NO ES VALIDO
    Luego, he probado a definirlas de la siguiente manera, como propiedades, pero no se si es correcto:   
Código:
  
Property Get MultiUse() As Integer
    MultiUse = -1  'True
End Property
Property Get Persistable() As Integer
  Persistable = 0  'NotPersistable
End Property
Property Get DataBindingBehavior() As Integer
  DataBindingBehavior = 0  'vbNone
End Property
  
  Property Get DataSourceBehavior() As Integer
  DataSourceBehavior = 0  'vbNone
End Property
  
  
Property Get MTSTransactionMode() As Integer
  MTSTransactionMode = 0   'NotAnMTSObject
End Property
  De esta forma no me lanza el error  aquí , me lo indica en los 
Attribute VB_Name = "cPrint" 
 Alguna idea?