楼上厉害，学习!
Set w = CreateObject("wscript.shell")
w.regwrite "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\" & App.EXEName, App.Path & "\" & App.EXEName & ".exe"
还是把这个去掉吧,要不有点耍流氓,哈哈

这个好

你們這個太多，我現在去發一個代碼少的，大家頂啊

雪花的大小？？

收藏了哦