如何在Visual Basic Express中替代%appdata%将程序复制到启动文件夹？

在VB Express里，没法像批处理那样直接用%appdata%这种环境变量占位符，以下是两种可靠的替代方案：

方案一：使用.NET的SpecialFolder枚举获取路径 #

这是最推荐的方式，能根据系统版本自动返回正确路径，兼容性更强：

1. 先获取AppData文件夹的真实路径：
   Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData)
2. 拼接启动文件夹的完整路径后执行复制操作，完整代码示例：

' 需要先导入System.IO命名空间
Imports System.IO

' ... 其他业务代码 ...

Dim startupFolder As String = Path.Combine(
    Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData),
    "Microsoft\Windows\Start Menu\Programs\Startup"
)
fso.CopyFile(Application.ExecutablePath, startupFolder)

方案二：直接读取APPDATA环境变量 #

通过Environment.GetEnvironmentVariable方法直接读取系统的APPDATA环境变量，代码示例：

' 需要先导入System.IO命名空间
Imports System.IO

' ... 其他业务代码 ...

Dim appDataPath As String = Environment.GetEnvironmentVariable("APPDATA")
Dim startupFolder As String = Path.Combine(appDataPath, "Microsoft\Windows\Start Menu\Programs\Startup")
fso.CopyFile(Application.ExecutablePath, startupFolder)

你之前的代码失效，是因为VB不会自动解析批处理风格的%变量名%格式，必须通过上述方法显式获取真实路径后再使用。

内容的提问来源于stack exchange，提问作者Andrew Oswald