注册表操作-.NET教程,文件IO

精彩推荐

分类最新教程

分类热点教程

注册表操作

作者：未知

日期：2003-07-12

人气：

投稿：Andy.m(转贴)

来源：未知

字体：大中小

收藏：加入浏览器收藏

以下正文：

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

相关文章：