VB 打开文件夹：使用 Shell 函数轻松打开指定目录

在 VB 中打开文件夹，可以使用 Shell 函数来执行操作系统的命令。以下是一个示例代码：

Sub OpenFolder()
    Dim folderPath As String
    folderPath = 'C:\Path\To\Folder' ' 替换为实际的文件夹路径
    
    Dim shellCommand As String
    shellCommand = "explorer.exe " & folderPath
    
    Shell shellCommand, vbNormalFocus
End Sub

在这个示例中，我们定义了一个名为 OpenFolder 的子过程，它通过 Shell 函数打开指定路径的文件夹。您需要将 folderPath 变量替换为您要打开的实际文件夹路径。

然后，我们构建了一个 shellCommand 字符串，其中包含了执行 explorer.exe 命令来打开文件夹的命令。最后，我们使用 Shell 函数来执行该命令，并指定 vbNormalFocus 参数以确保文件夹窗口在前台打开。

您可以将此代码放在您的 VB 项目中的适当位置，并调用 OpenFolder 子过程来打开指定的文件夹。