用Shell打开记事本文本，如何可以打开任意安装路径的*。TXT文本？

我写了代码在VB程序中调用NOTEPAD。EXE打开TXT文本。

Private Sub Command1_Click()
Shell ("C:\WINDOWS\NOTEPAD.EXE  E:\12345\1.TXT"), 1
End Sub

我想将文件安装在任意硬盘，则下面方法好像是不行
Private Sub Command1_Click()
Shell ("C:\WINDOWS\NOTEPAD.EXE  app.path & 12345\1.TXT"), 1
End Sub

请教该如何改？ --------------------编程问答-------------------- Shell ("C:\Windows\Notepad.exe " & Left$(App.Path, 2) & "\12345\1.txt"), 1

你最好把需要用的字符的地方，用一个字符变量保存起来，然后在调试的时候用DeBug.Print来测试一下看是不是你想要的效果，然后在更改。 --------------------编程问答-------------------- 代码写错了，字符串里怎么能有变量？拿出来再用字符串连接就好
Shell   ( "C:\WINDOWS\NOTEPAD.EXE     " & app.path &  "12345\1.TXT "),   1  --------------------编程问答-------------------- 变量不能放在双引号里，否则就当作普通文本处理了，2楼的方法才是对的 --------------------编程问答-------------------- Shell ("NOTEPAD.EXE " & App.Path & "\12345\1.TXT"), 1 --------------------编程问答-------------------- ;"\"
Shell    "NOTEPAD.EXE   "   &   App.Path   &  "\"  &  "12345\1.TXT ",   1

补充：VB ,  基础类