注册表操作

2024-07-21 02:24:30

字体：大中小

来源：转载

供稿：网友

public sub savesettings()
        dim parentkey as microsoft.win32.registrykey = microsoft.win32.registry.currentuser.opensubkey("software", true)
        dim key as microsoft.win32.registrykey = parentkey.opensubkey(mcapplicationname, true)
        if key is nothing then
            key = parentkey.createsubkey(mcapplicationname)
        end if
        with key
            .setvalue("host name", me.hostnameentry.text)
            .setvalue("host port", me.hostportentry.text)
            .setvalue("user name", me.usernameentry.text)
            .setvalue("user password", me.userpasswordentry.text)
        end with
    end sub

收集最实用的网页特效代码！

上一篇：Exploring the System.IO namespace

下一篇：密码的故事（转自MSDN）