Tecnología

Inicio

Cómo conectar VB6.0 y VC ++

Cómo conectar VB6.0 y VC ++


VB6.0 y VC ++ son los dos lenguajes de programación orientados a objetos. También son lenguajes de desarrollo de aplicaciones de Microsoft. Cuando se desarrolla una aplicación, debe utilizar las mejores características de los lenguajes de programación, ya que cada lengua tiene características únicas. Puede que tenga que programar con las dos lenguas para maximizar los beneficios de una aplicación. El uso de una DLL (Librería de Enlace Dinámico), puede aprovechar las ventajas de los dos idiomas. El DLL construida en VC ++ también se puede utilizar en VB 6.0.

Instrucciones

1 Haga clic en "Inicio", "Todos los programas" y "Visual Basic 6" para abrir VB6.0. Haga clic en "Archivo", "Nuevo proyecto" y "DLL ActiveX" para crear un archivo DLL de ActiveX. Cambie el nombre del proyecto a "DLLFile" en la ventana de propiedades. Haga clic en "Guardar" para guardar el proyecto en el equipo local.

2 Haga clic en "Proyecto" y "Referencias" para añadir referencias de Excel a la lista de referencia existente:
C: \ Archivos de programa \ Microsoft Office \ Office11 \ Excel.exe. Esto tiene la referencia establecido para la Biblioteca de objetos de Microsoft Excel.

3 Haga clic dllfile.vb en el "Explorador de soluciones" e introduzca el código siguiente después de la "Opción declaración explícita":
implementa AddInDesignObjects.IDTExtensibility2

4 Crear un nuevo módulo de clase, haga clic en el nombre del proyecto y seleccione Introducir el siguiente código "Nueva clase.":
Option Explicit

Option Compare Text
Private WithEvents pExcelApp As Excel.Application
Friend Property Get ExcelApp() As Excel.Application
Set ExcelApp = pExcelApp
End Property

Este módulo de clase define los eventos de aplicación de Excel. Haga clic en "Archivo", "Guardar proyecto" y "EXE estándar" para compilarlo. Busque el archivo cumplido desde donde guardó el proyecto.

5 Haga clic en "Inicio", "Todos los programas" y "VC ++." Haga clic en "Nuevo" y "proyecto" para crear un nuevo proyecto. Haga clic en "Form1.vc" e incluya el archivo DLL:

incluir "dllfile.dll"

6 Cargar el archivo DLL en la memoria y crear una instancia del mismo:
HINSTANCE hLib = LoadLibrary ( "dllfile.dll");
si (hLib == NULL)
{
cout << "ERROR: No se puede cargar la biblioteca!" << Endl;
getch ();
regreso;
}

7 Buscar a través del archivo DLL y encontrar la dirección de las funciones:
TestFunc = (cfunc) GetProcAddress ((HMODULE) hLib, "TestFunc");
RetInt = (ifunc) GetProcAddress ((HMODULE) hLib, "RetInt");