问：路径（ProgramFiles）\我的文件夹

Question

我想在 VB.NET

的程序文件中为我的新文件夹创建一个 link

这是我的代码：

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    If (Not Directory.Exists(Environment.GetFolderPath(Environment.SpecialFolder.ProgramFiles) + "\UniWin Activator")) Then
        Directory.CreateDirectory(Environment.SpecialFolder.ProgramFiles + "\UniWin Activator")
    End If
    File.Create(Environment.SpecialFolder.ProgramFiles + "\UniWin Activator\Dont-show-again.txt").Dispose()
End Sub

有人可以帮我修改一下吗？

我想要的代码是：

1- 如果文件夹 (Program Files Location)\UniWin Activator 未创建则创建它

2- 在文件夹 (Program Files Location)\UniWin Activator

下创建文本文件 Dont-show-again.txt

Answer 1

所以您的代码有什么问题 SpecialFolder.ProgramFiles 或任何其他 SpecialFolder.xx 实际上是一个整数。 Special Folder 是一个枚举。因此，您必须使用 Environment.GetFolderPath() 来获取实际路径。 SpecialFolder.ProgramFiles returns 值为 38 而 Environment.GetFolderPath() returns 正确路径（字符串）。此外，由于您多次使用 ProgramFiles\UniWin Activator 路径，请将其存储在变量中。这是正确的代码：-

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim uniWinPath = Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.ProgramFiles), "UniWin Activator")
        If Not Directory.Exists(uniWinPath) Then
            Directory.CreateDirectory(uniWinPath)
        End If
    File.Create(Path.Combine(uniWinPath, "Dont-show-again.txt")).Dispose()
End Sub

问：路径（ProgramFiles）\我的文件夹

Q: Path (ProgramFiles)\my folder

vb.net

desktop-application