如WORD
Private Sub Form_Load()
Set wordApp = CreateObject("word.Application")
Text1 = wordApp.Path
End Sub

这样TEXT1就能显示WORD的路径了``

如果是像显示其它EXE文件的呢`?~怎么弄``
如:qq.exe

高手呢`?~

Private Sub Form_Load()
Set wordApp = CreateObject("word.Application")
Text1 = wordApp.Path
End Sub



第二句和第三句没懂是什么意思
获取文件路径好像可以用filesystemobject里的一些方法。不过没什么研究。

读取注册表相关键值