VB6.0 og VC + + er begge objektorienterte programmeringsspråk. De er også Microsofts programutvikling språk. Når du utvikler et program , bør du bruke de beste funksjonene i programmeringsspråk , som hvert språk har unike egenskaper . Du må kanskje program med begge språk for å maksimere et programs fordeler. Ved hjelp av en DLL ( Dynamic Link Library) , kan du utnytte fordelene av begge språk . DLL- bygget i VC kan også brukes i VB 6.0. Du trenger
DLL
Vis flere instruksjoner
en
Klikk " Start", " Alle programmer " og " Visual Basic 6 " for å åpne VB6.0 . Klikk på "File ", " New Project" og " ActiveX DLL " for å lage en ActiveX DLL -fil . Endre prosjektet navn til " dllfile " i Property vindu . Klikk på " Lagre" for å lagre prosjektet til den lokale datamaskinen
2
Klikk på " Project" og " Referanser " for å legge Excel referanser til den eksisterende referanselisten : . C: \\ Programfiler \\ Microsoft Office \\ Office11 \\ Excel.exe . Dette har referansen satt opp til Microsoft Excel Object Library
3
Klikk dllfile.vb på " Solution Explorer" og skriv inn følgende kode etter " Option Explicit erklæringen " : . Redskaper AddInDesignObjects . IDTExtensibility2
4
Opprett en ny klasse modul ved å høyreklikke prosjektnavnet , og velg Legg inn følgende kode " ny klasse . " : Alternativ ExplicitOption Sammenligne TextPrivate WithEvents pExcelApp Som Excel.ApplicationFriend eiendom får ExcelApp ( ) Som Excel.ApplicationSet ExcelApp = pExcelAppEnd PropertyThis klassemodulen definerer Excel-programmet hendelser . Klikk på "File ", " Legg Project" og " Standard EXE " for å kompilere den . Finn overholdt filen fra der du har lagret prosjektet .
5
Klikk " Start", " Alle programmer " og " VC + + . " Klikk "New" og "Project " for å opprette et nytt prosjekt . Klikk " Form1.vc " og inkludere dll -filen : # include " dllfile.dll "
6
laste DLL inn i minnet og opprette en forekomst av det: hInstance hLib = LoadLibrary ( " dllfile . dll "); if ( hLib == NULL) {domstol <<" FEIL: Kan ikke laste bibliotek "<< endl; getch (); return; }
7
Søk gjennom DLL -filen og finne adressen til funksjoner: TestFunc = ( cfunc ) GetProcAddress ( ( HMODULE ) hLib , " TestFunc "); RetInt = ( ifunc ) GetProcAddress ( ( HMODULE ) hLib , " RetInt ");