各位大佬：
  现在有个问题请教一下，用“Shell "C:\windows\system32\notepad.exe" + " " + "c:\使用说明.txt"”，操作后：使用说明.txt 是最小化在工具条位置，我需要 的效果是打开该文件，并显示在桌面上，怎样才能实现，

Private Sub Label2_Click()
 pid = Shell("C:\windows\system32\notepad.exe " & App.Path & "\使用说明.txt", 1)
 AppActivate pid
End Sub

[此贴子已经被作者于2018-11-29 21:03编辑过]

谢谢你，可以实现了，