VB自启代码
[来源：网民提供 | 浏览：4181106 | 收藏这网页]
生活小百科网:怎样在VB中加段代码，使其加到启动项。这里专家的回答会让您满意
创建：
Set w = CreateObject("wscript.shell")
w.regwrite "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\" & App.EXEName, _
App.Path & "\" & App.EXEName & ".exe"
删除：
Set w = CreateObject("wscript.shell")
w.regdelete "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\" & App.EXEName
创建：
Set w = CreateObject("wscript.shell")
w.regwrite "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\" & App.EXEName, _
App.Path & "\" & App.EXEName & ".exe"
删除：
Set w = CreateObject("wscript.shell")
w.regdelete "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\" & App.EXEName
- 如果您发现我们的文章侵犯了你的权利，请告诉我们.
- 本站所选文章由网民提供，文章内容观点不代表本站立场.