【网友问题】∫牛魔王∫(124715993)  10:00:45
@Accessoft--麥田  我想打开当前程序所在的文件夹，老师该怎么办？

Accessoft--麥田(2851379731)  10:08:13
Private Sub Cmd_test_Click()
    Dim filePath As String
    filePath = CurrentProject.Path
    Shell "explorer " & filePath, vbNormalFocus
End Sub

改成这种。

∫牛魔王∫(124715993)  10:14:27
收到，谢谢老师!
可以了 太棒了

附   件:

点击下载此示例
 

演   示: