VB6.0 och VC + + är både objektorienterade programmeringsspråk . De är också Microsofts applikationsutveckling språk . När du utvecklar ett program , bör du använda de bästa funktionerna i programmeringsspråk , eftersom varje språk har unika egenskaper . Du kan behöva programmet med båda språken för att maximera ett programs fördelar . Använda en DLL ( Dynamic Link Library ) , kan du utnyttja fördelarna med båda språken . Den DLL byggd i VC + + kan också användas i VB 6.0. Saker du behöver
DLL
Visa fler instruktioner
1
Klicka på "Start ", " Alla program " och " Visual Basic 6 " för att öppna VB6.0 . Klicka på " File ", " Nytt projekt " och " ActiveX DLL " för att skapa en ActiveX-DLL -fil . Ändra projektets namn till " dllfile " i egenskapsfönstret . Klicka på " Spara " för att spara projektet till din lokala dator
2
Klicka på " Projekt " och " Referenser " för att lägga till Excel hänvisningar till den befintliga hänvisningen listan : . C: \\ Program \\ Microsoft Office \\ Office11 \\ Excel.exe . Detta har referens inrättats till Microsoft Excel Object Library
3 dllfile.vb
Klicka på " Solution Explorer " och skriv in följande kod efter " Option Explicit deklaration " : . Redskap AddInDesignObjects . IDTExtensibility2
4
Skapa en ny klass modul genom att högerklicka på projektets namn och välj Skriv följande kod " ny klass . " : Alternativ ExplicitOption Jämför TextPrivate WithEvents pExcelApp som Excel.ApplicationFriend Property Get ExcelApp ( ) Som Excel.ApplicationSet ExcelApp = pExcelAppEnd PropertyThis klassmodul definierar Excel-applikation händelser . Klicka på " File ", " Lägg Project " och " Standard EXE " för att kompilera det . Leta upp uppfyllt filen där du sparat projektet .
5
Klicka på "Start ", " Alla program " och " VC + + . " Klicka " Ny " och " Project " för att skapa ett nytt projekt . Klicka " Form1.vc " och inkludera dll -filen : # include " dllfile.dll "
6
läsa den dll i minnet och skapa en instans av det : HINSTANCE Hlib = LoadLibrary ( " dllfile . dll " ) , om ( Hlib == null ) { cout << " FEL : Kunde inte ladda bibliotek " << endl; getch ( ) , avkastning; }
7
Sök igenom DLL -filen och hitta adressen funktioner : TestFunc = ( cfunc ) GetProcAddress ( ( HMODULE ) Hlib , " TestFunc " ) ; RetInt = ( ifunc ) GetProcAddress ( ( HMODULE ) Hlib , " RetInt " ) ;
Addera ditt
