怎么样创建启动快捷方式?
我想用VB6.0程序创建启动快捷方式，当我点击创建启动快捷按钮时，在程序-> 启动下创建exe文件，当我再点删除启动快捷按钮，删除启动快捷方式。
不受系统版本的限制，比如说系统是英文版的或是繁体版的
[解决办法]
建立桌面快捷方式
Sub CreatShortCut()
Set WSHShell = CreateObject( "WScript.Shell ")
Dim MyShortcut, MyDesktop, DesktopPath
DesktopPath = WSHShell.SpecialFolders( "Desktop ")
With WSHShell.CreateShortcut(DesktopPath & "\記事本捷徑.lnk ")
.TargetPath = WSHShell.ExpandEnvironmentStrings( "%windir%\notepad.exe ")
.WorkingDirectory = WSHShell.ExpandEnvironmentStrings( "%windir% ")
.WindowStyle = 4
.IconLocation = WSHShell.ExpandEnvironmentStrings( "%windir%\notepad.exe, 0 ")
.Save
End With
End Sub
