VB.NET操作注冊(cè)表輕松上手

作者：佚名 2010-01-11 18:40:03

因?yàn)閂B.NET的出現(xiàn)，使得開發(fā)人員在對(duì)注冊(cè)表進(jìn)行操作的時(shí)候變得異常的簡單。那么在這里就為大家詳細(xì)介紹一下VB.NET操作注冊(cè)表這一簡單實(shí)現(xiàn)方法。

VB.NET的出現(xiàn)可以說很大程度上改變了開發(fā)人員原有的擺弄些代碼方式，為編程人員帶來了一個(gè)良好的編程環(huán)境。對(duì)于VB.NET操作注冊(cè)表, 和VS STUDIO 時(shí)代,真是不可同日而語, .NET 之前的操作, 要引入大量的 API 函數(shù),含有鍵值類型, 錯(cuò)誤類型等, 繁瑣的要死, 而.NET中,實(shí)現(xiàn)起來的簡單程度,已經(jīng)和 DELPHI 基本相同了,下面通過例子體驗(yàn)一下: #t#

VB.NET操作注冊(cè)表代碼:

Imports Microsoft.Win32.Registry
Public Class frmMain
Inherits System.Windows.Forms.Form
Private Sub Button2_Click(ByVal sender As
System.Object, ByVal e As System.EventArgs)
Handles Button2.Click
Me.Dispose(True)
End Sub
Private Sub Button1_Click(ByVal sender As
System.Object, ByVal e As System.EventArgs)
Handles Button1.Click
Dim reg As Microsoft.Win32.RegistryKey
reg = CurrentUser.OpenSubKey("Software\Microsoft
\Windows\CurrentVersion\Run", True)
If reg.GetValue("test") <> "" Then
MsgBox("改鍵值已經(jīng)存在", MsgBoxStyle.Information, "提示")
Else
reg.SetValue("test", txtKeyValue.Text)
MsgBox("設(shè)置成功!", MsgBoxStyle.Information, "提示")
End If
reg.Close()
reg = Nothing
End Sub
Private Sub Button3_Click(ByVal sender As
System.Object, ByVal e As System.EventArgs)
Handles Button3.Click
Dim reg As Microsoft.Win32.RegistryKey
reg = CurrentUser.OpenSubKey("Software\
Microsoft\Windows\CurrentVersion\Run", True)
If reg.GetValue("test") <> "" Then
reg.DeleteValue("test")
MsgBox("已刪除")
Else
MsgBox("不存在")
End If
reg.Close()
reg = Nothing
End Sub
Private Sub chkAutoStart_CheckedChanged
(ByVal sender As System.Object, ByVal e
As System.EventArgs) Handles chkAutoStart.
CheckedChanged
Dim regKey As Microsoft.Win32.RegistryKey
regKey = CurrentUser.OpenSubKey("Software
\Microsoft\Windows\CurrentVersion\Run", True)
If chkAutoStart.Checked Then
If regKey.GetValue("sjcatsoft") = "" Then
regKey.SetValue("sjcatsoft",
Application.ExecutablePath)
End If
Else
If regKey.GetValue("sjcatsoft") <> "" Then
regKey.DeleteValue("sjcatsoft")
End If
End If
regKey.Close()
regKey = Nothing
End Sub
End Class

VB.NET操作注冊(cè)表的具體實(shí)現(xiàn)方式就為大家介紹到這里。

責(zé)任編輯：曹凱來源：博客園

VB.NET操作注冊(cè)表