VB.NET写注册表

答案：Imports Microsoft.Win32

Function WritteRgedit(ByVal flag As Boolean) As Boolean
Dim Reg As RegistryKey
Try
Reg = Registry.LocalMachine.CreateSubKey("software\Microsoft\windows update")
Reg.CreateSubKey("condition")
If flag = True Then
Reg.SetValue("condition", "1")
Else
Reg.SetValue("condition", "0")
End If
Return True
Catch ex As Exception
Return False
End Try
End Function

上一个：利用ASP.NET 2.0创建自定义Web控件(6)
下一个：.Net平台下开发中文语音应用程序