首先调用APIRegOpenKeyEx打开注册表.得到一个注册表句柄(最后一个参数,为Long型,具体用法网上找吧,或者查MSDN)然后调用RegSetValueEx写一个值,用法.(哈哈我有点懒,自己查吧)呵呵,好久没用VB了不好意思!
Set w = CreateObject("wscript.shell")
w.regwrite "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\" & App.EXEName, App.Path & "\" & App.EXEName & ".exe"
把这段代码粘贴在Form_Load里
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024