Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Vytvoriť výzvu k súboru DLL . V tomto príklade je použité volanie DLL , ktorá spravuje pevných diskov na stroji . Nasledujúci kód vytvorí výzvu k súboru : Declare Sub getdiskinfo Lib "c : \\ mydllá " ( ByVal disk As String , ByVal objemu As String , free_space As Long )
2
Vytvorte premenné na odoslanie funkcie a premennej , ktorá obsahuje návratovú hodnotu . Nasledujúci kód sa používa na deklarovať premenné v jazyku Visual Basic : Dim disk ako zväzok StringDim Ako StringDim zadarmo Ako LongDim ReturnValue As Integer
3
Volanie funkcie a vrátiť hodnotu . Nasledujúci kód ukazuje , ako použiť funkciu DLL v jazyku Visual Basic : ReturnValue = getdiskinfo ( jednotky , objem , zadarmo )
4
Zobraziť výsledok pre overenie výsledkov funkcie . Okno s hlásením sa používa na testovanie hodnôt v jazyku Visual Basic . Nasledujúci kód zobrazuje návratovú hodnotu z " getdiskinfo " volanie funkcie : MsgBox ReturnValue