Ver Mensaje Individual
  #17 (permalink)  
Antiguo 13/02/2006, 14:42
Avatar de VisualGuallabo
VisualGuallabo
 
Fecha de Ingreso: marzo-2005
Mensajes: 288
Antigüedad: 19 años, 1 mes
Puntos: 2
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'
__________________
"No hay lenguaje de programación potente que sea inferior a otro semejante cuando existe un buen programador que lo defiende"

Yosvanis Cruz Alias VisualGuallabo
Ycruz

Última edición por VisualGuallabo; 13/02/2006 a las 14:47