我想用shell语句打开。
shell "explorer D:\我的程序\我的文件夹" vbNormalFocus
用这条语句就可以在我的电脑中打开“我的文件夹”这个文件夹，“D:\我的程序”就是我的vb工程的所在文件夹啊，现在问题是我想把上面shell语句中的路径用app.path来代替，就是不知道代码怎么写啊？

' _ Context: Sub or Function

Shell "explorer " & IIf(Len(App.Path)=3,App.Path & "\", App.Path) & "\My Directory"

不过我推荐下面这个

Shell """explorer " & IIf(Len(App.Path)=3,App.Path & "\", App.Path) & "\My Directory"""