Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Otvorte Visual Basic 6.
2
zvoľte " Štandardné EXE " z nového zoznamu projektov .
3
kliknite na " projekt " a potom kliknite na tlačidlo " Pridať modul " pridať štandardného modulu kódu do VB6 projekt
4
Zadajte nasledujúci kód v module kódu : .
Sub LookIntoRegisty ( )
Dim mystringValue As String
SaveSetting " MyAppName " , " názov sekcie " , " Název_klíče " , " I_Am_Saving_This_Line_Into_Registry "
mystringValue = GetSetting ( " MyAppName " , " názov sekcie " , " Název_klíče " , " MyDefault " )
MsgBox mystringValue
End Sub
predchádzajúce VB6 kódu vytvorí čiastkové postup s názvom : LookIntoRegisty , potom používa príkaz VB Dim deklarovať premennú s názvom : mystringValue . Kód potom používa funkciu VB SaveSettings uložiť informácie do registra systému Windows . Potom použije funkcia GetSetting pozrieť do registra a získať hodnotu , je potom priradí k mystringValue , a potom zobrazí hodnotu na displeji pomocou funkcie MsgBox
5
Stlačte " F5 " na . spustiť program .