CREACIÓN DE BIBLIOTECAS DE ENLACE DINÁMICO:

Una dll o biblioteca de enlace dinámico (Dynamic Link Librairy) es una parte de código, o partes de programa compilado que no se ejecutan en el momento en que se ejecuta el programa principal, sino que solamente se carga en el momento en que se llama en el momento en el que el programa principal llama a una función que esté contenida en la dll.

Creamos una dll de la misma manera que crearíamos un control Active X.

Escogemos en el tipo de proyecto el tipo dll Activex, se nos abre una ventana a tipo de módulo de una aplicación al que le podemos añadir un los fomularios que necesitemos.

Lo primero que debemos hacer es cambiar el nombre del proyecto de la librería porque si dejamos la que tiene por defecto, tendremos problemas porque los proyectos por defecto tendrán el mismo nombre y al añadirla a una nueva aplicación, no aceptará librerías que tengan el mismo nombre que el proyecto.

Para cambiar el nombre del proyecto vamos a proyecto-propiedades-nombre y le ponemos Librería.dll

En el código añadimos la siguiente función en la dll

Public sub mostrar

End sub

También debemos cambiar la propiedad Instancing de la dll. Para dejarla como GlobalMultiuse, así podremos acceder a cualquier función de la librería desde cualquier parte del programa en la que la incorporemos.

Desde la ventana de proyecto podemos agregar con el botón derecho un formulario a la librería.

En el formulario añadimos un botón y un label simplemente para corroborar que funciona correctamente.

Así que en la función command1_click podemos añadir el texto siguiente al label:

Label1.caption=”Hola desde la librería”

Para que la librería pueda abrir el formulario que hemos añadido introduciremos el siguiente código.

Declaramos una variable del tipo formulario, y en la función mostrar introducimos el código. Para inicializar el formulario.

Dim f as Form

Public sub mostrar

Set f = new Form1

f.show

End sub

Simplemente con esto tendriamos construida la dll. Para compilar vamos a archivo generar libreria1.dll

Creamos un nuevo proyecto del tipo exe, y incorporamos en este proyecto un botón y agregaremos al proyecto la librería desde el menú proyecto – referencias – examinar – librería1.dll

Sin añadir nada más que añadir en la función del botón escribimos la función mostrar.

Private sub Command1_clic

mostrar

End sub

Observamos el resultado