vb.net查找注册表 vb读取注册表中的某个值( 二 )


RegCloseKey hkey
If retval0 Then
MsgBox "读取注册表失败,错误代码vb.net查找注册表:" + CStr(retval), vbExclamation, "错误"
End If
ShowCheck (lvalue)
End Sub
Private Sub ShowCheck(lvalue As Long)
Check0.Value = https://www.04ip.com/post/lvalue Mod 2
lvalue = https://www.04ip.com/post/(lvalue - Check0.Value) / 2
Check1.Value = https://www.04ip.com/post/lvalue Mod 2
lvalue = https://www.04ip.com/post/(lvalue - Check1.Value) / 2
Check2.Value = https://www.04ip.com/post/lvalue Mod 2
lvalue = https://www.04ip.com/post/(lvalue - Check2.Value) / 2
Check3.Value = https://www.04ip.com/post/lvalue Mod 2
lvalue = https://www.04ip.com/post/(lvalue - Check3.Value) / 2
Check4.Value = https://www.04ip.com/post/lvalue Mod 2
lvalue = https://www.04ip.com/post/(lvalue - Check4.Value) / 2
Check5.Value = https://www.04ip.com/post/lvalue Mod 2
lvalue = https://www.04ip.com/post/(lvalue - Check5.Value) / 2
Check6.Value = https://www.04ip.com/post/lvalue Mod 2
End Sub
Private Function GetValue() As Long
GetValue = https://www.04ip.com/post/Check0.Value + Check1.Value * 2 + Check2.Value * 4 + Check3.Value * 8 + Check4.Value * 16 + Check5.Value * 32 + Check6.Value * 64 + 128
End Function
以上 。
饿的老狼
VB.net注册表操作问题微软在net里内置了一一些提供注册表操作的类 , 因此我们可以很轻松的操作注册表
导入名词称空间 imports Microsoft.Win32
Dim reg As RegistryKey
Dim regStr As String
reg = Registry.LocalMachine
reg = reg.OpenSubKey("SYSTEM\CurrentControlSet\Enum\USB", True)
regStr = reg.GetValue("VID_08E2PID_0006")
if regstr.tostring""then …复制文件
如何用VB.net 写注册表我来告诉大家什么是纯绿软件--(希望无知者不要再胡说八道了)
有人说:
还有哪些所谓写绿色软件的人是不懂windows编程,根本就写不出注册的过程 。所以自我安慰的叫绿色软件 。不知大家注意没有绿色软件是不可以在天加删除中删掉的 。只要它运行就会产生很多拉圾,而且是到处乱放 , 这就是为什么容易出问题的原因所在 。
我只能说,这样说话的人是个电脑肓 。
或是根本不懂得绿色软件的含义 。
绿色软件有如下严格特征:
1、不对注册表进行任何操作(或只进行非常少的,一般朋友能理解的操作,典型的是开机起动 。少数也进行一些临时操作,一般在程序结束前会自动清除写入的信息) 。
2、不对系统敏感区进行操作 , 一般包括系统起动区根目录、安装目录(windows目录)、程序目录(Program Files)、帐户专用目录 。
3、不向非自身所在目录外的目录进行任何写操作 。
4、因为程序运行本身不对除本身所在目录外的任何文件产生任何影响,所以 , 根本不存在安装和卸载问题 。
5、程序的删除,只要把程序所在目录和对应的快捷方式删了就可以了(如果你手工在桌面或其它位置设了快捷方式),只要这样做了 , 程序就完全干净地从你的电脑里删去了,不留任何垃圾 。

对于编程人员来说,做一个绿色软件不难,做一个非绿色软件也不难,但是为什么那么多软件不做成绿色的呢?下面作一些讲解:
一、大型软件公司的大型软件为什么不做成绿色的:
1、大型软件公司并非没有能力做出绿色软件,但它们的软件涉及的方面过多,需要对系统原有的一些设置进行改动,以使电脑按照软件设计要求进行操作 。以PhotoShop为例,它就需要在注册表里添加很多种格式文件的默认打开方法为PhtoShop.exe,以便大家双击此类文件后就自动打开PhotoShop以便编辑 。

推荐阅读