16,555
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
liaoyuME 2012-01-31
- 打赏
- 举报
Dim Reg As Microsoft.Win32.RegistryKey
Reg = Microsoft.Win32.Registry.CurrentUser
Reg.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Run", True)
Reg.SetValue("命名个名字", Application.ExecutablePath)'写入注册表
Reg.Close()
Reg = Microsoft.Win32.Registry.CurrentUser
Reg.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Run", True)
Reg.SetValue("命名个名字", Application.ExecutablePath)'写入注册表
Reg.Close()
