大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
请使用VB.NET的“My”功能: '添加
专业领域包括网站制作、成都网站设计、电子商务商城网站建设、微信营销、系统平台开发, 与其他网站设计及系统开发公司不同,成都创新互联公司的整合解决方案结合了帮做网络品牌建设经验和互联网整合营销的理念,并将策略和执行紧密结合,为客户提供全网互联网整合方案。
My.Computer.Registry.LocalMachine.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True).SetValue("running", "C:\myapp.exe") ' 删除
My.Computer.Registry.LocalMachine.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True).DeleteValue("running")
这不是废话吗,DeleteSubKey只能删除调用实例的子项,并不能直接删除子子项。
1.开始--运行--regedit 打开注册表
2.在注册表里面搜索vb ,删除所有关于vb的东东.
3.重新启动计算机
之后再试一试
微软在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(VS2005+版本),操作注册表非常容易: For Each name As String In My.Computer.Registry.LocalMachine.OpenSubKey("software\microsoft\windows\currentversion\run").GetValueNames
If (name "1425") Then
My.Computer.Registry.LocalMachine.OpenSubKey("software\microsoft\windows\currentversion\run").DeleteValue(name)
End If
Next