VB.NET |获取当前用户配置文件文件夹

Question

我如何使用 'path'转到用户的当前个人资料？

例如，我有这个代码:

        Dim fso, fldr
    fso = CreateObject("Scripting.FilesystemObject")

    fldr = fso.GetFolder("C:\Documents and Settings\%UserProfile%\Local Settings\TEST")

    'delete subfolders
    For Each subf In fldr.SubFolders

        subf.Delete(True)

    Next

    'delete subfiles
    For Each fsofile In fldr.Files

        fsofile.Delete(True)

    Next

我试过这种方式，路径未知。

我该如何制作 C:\Documents and Settings\???\Local Settings\TEST转到当前用户的文件夹？

Answer 1

使用“userprofile”环境变量...

MsgBox(Environment.GetFolderPath(Environment.SpecialFolder.UserProfile))