Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Otvoriť VB6 .
2
zvoľte " Štandardné EXE " z nového zoznamu projektov .
3
Prejsť na horná lišta menu , kliknite na " projekt " a potom kliknite na tlačidlo " Pridať modul . " To bude pridať štandardné modulu kódu do VB6 projekt
4
Zadajte alebo skopírujte a vložte nasledujúci kód v module kódu : .
Sub SaveandGetKey ( )
Dim strValue As String
SaveSetting " MyAppName " , " názov sekcie " , " Název_klíče " , " MyAddedValue "
strValue = GetSetting ( " MyAppName " , " názov sekcie " , " Název_klíče " , " MyDefault " )
MsgBox strValue
End Sub
kód vytvorí čiastkové postup s názvom : SaveandGetKey . To potom používa príkaz VB Dim deklarovať premennú s názvom strValue . Kód potom používa funkciu VB SaveSettings uložiť informácie do registra systému Windows . Informácia sa uloží do HKEY_CURRENT_USER \\ Software \\ VB a VBA Program Settings \\ MyAppName kľúča v registri . To potom používa funkciu GetSetting získať hodnotu , priradí ju k strValue a potom zobrazí hodnotu na obrazovke pomocou funkcie MsgBox .
5
Stlačte " F5 " pre spustenie programu , a vy by ste mali pozri pridaný do registra hodnotu .