16,717
社区成员
发帖
与我相关
我的任务
分享用vb.net读写注册表(给20分)
我在HKEY_CURRENT_USER\Software\yjs_mk下有个yjs,初值为0(REG_SZ类型)
我想在vb.net程序中首先判断此项名称有没有,有的话把值写为1,没有的话就写进去.
急..........
我想在vb.net程序中首先判断此项名称有没有,有的话把值写为1,没有的话就写进去.
急..........
...全文
请发表友善的回复…
发表回复
Bullatus 2008-09-04
- 打赏
- 举报
在Vista下写注册表时，最可恶的就是程序需要以管理员运行
JeffChung 2008-09-04
- 打赏
- 举报
判断是否存在值
If My.Computer.Registry.GetValue("HKEY_Current_User\SOFTWARE\yjs_mk", _
"yjs", Nothing) Is Nothing Then
MsgBox("Value does not exist.")
End If
关键的都给了,自己整一下吧
If My.Computer.Registry.GetValue("HKEY_Current_User\SOFTWARE\yjs_mk", _
"yjs", Nothing) Is Nothing Then
MsgBox("Value does not exist.")
End If
关键的都给了,自己整一下吧
JeffChung 2008-09-04
- 打赏
- 举报
Dim hklm As RegistryKey = Registry.CurrentUser
Dim software11 As RegistryKey = hklm.OpenSubKey ( "SOFTWARE\\yjs_mk" )
software11.SetValue ( "yjs" , "1" )
Dim software11 As RegistryKey = hklm.OpenSubKey ( "SOFTWARE\\yjs_mk" )
software11.SetValue ( "yjs" , "1" )
zhoushi4560426 2008-09-04
- 打赏
- 举报
在线等.....
