如何用按钮打开绝对目录下的文件呢？

Question

把要打开的文件放在绝对目录中，用什么方法打开？

Answer 1

用通用对话框
microsoft common dialog control 6.0

Answer 2

我意图是一个Command按钮 直接就能打开文件没有对话框

Answer 3

愚钝了……你自己先说具体些吧：怎么打开？你要打开什么？
用word打开doc文件？
还是把文件打开读入内存？
Private Sub Command1_Click()
    Open "c:\神马文件夹\神马文件.神马扩展名" For Input As #1
    ' .......
    Close #1
End Sub
用open方法打开

Answer 4

其实大家都错了，楼主肯定是指双击鼠标“打开”的意思。假设你要打开的文件为：c:\t1.txt
Option ExplicitPrivate Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As LongPrivate Sub Form_Load()
    ShellExecute 0, "open", "c:\t1.txt", vbNullString, vbNullString, 1
End Sub

Answer 5

这是api函数，没有什么原理不原理的，照着它的说明用就行了。你用个手机需要知道里面板子、屏幕什么的工作原理吗？只要会按键看懂屏幕就行了。

Answer 6

关于这个函数较详细的说明：
http://baike.baidu.com/view/1044533.htm更详细的可以去翻win32api手册。

Answer 7

不好判断，要么根据打开的文件的特征，例如窗口标题含有xxx等字眼，然后用api函数去检测所有窗口，不过这个不准确，不推荐。如果是自己的vb程序可以用app.PrevInstance判断，话说exe程序也是文件吧。相关事例代码：百度。

Answer 8

也可以不用API
shell "notepad.exe c:\t1.txt"
老规矩，新问题新帖子

Answer 9

shell函数必须要明确指定相关exe，如果用户机器的txt文件双击是用notepad++打开的结果是普通notepad打开了会以为机器出问题了。另外文件扩展名太多了，一一判断他的启动程序太复杂，而且启动参数也不一定都是直接跟文件路径的。