Cómo escribir dll con vb

Utilice una función para escribir la biblioteca de vínculos dinámicos MathLib.dll:

Función Add2(ByVal a As Integer, ByVal b as Integer) As Integer

Add2= a+b

Función final

¿Cómo escribir esta biblioteca de enlaces dinámicos?

Método

Inicie VB, seleccione ActiveX DLL en la ventana del nuevo proyecto y el sistema generará un proyecto con un módulo de clase.

Defina el proyecto como DllTest (también se puede personalizar), defina un módulo de clase llamado MathLib e ingrese la función Add2 en él, de modo que el componente llamado DllTest esté listo y el componente se compile en una DLL. documento. Cierra el programa VB.

Llamar

Inicie otro VB y cree un nuevo EXE estándar, haga clic en el menú Proyecto | Referencia, seleccione el componente DllTest en la ventana de referencia y complete el siguiente código en Form_Click:

Dim oMathLib como nueva MathLib

Dim r como entero

Dim r como entero

Dim r como nueva MathLib como nueva MathLib

Dim r como entero

Dim r como entero

Dim r como entero

R = oMathLib.Add2(3, 2)

MsgBox "3+2=" & r

Después de ejecutar este formulario, haga clic en la ventana emergente de resultados y aparecerá 3+2=5. Además, se mostrará el componente compilado. un archivo DLL. Debe registrar RegSvr32 -r DllTest.dll antes de usarlo. .