VB基础问题

来源：百度知道 编辑：UC知道 时间：2024/05/18 01:25:58
我是一个VB初学者我在学用CommonDialog控件
我先用菜单编辑器做了一个打开的菜单
然后我编写了打开菜单的Click事件
Private Sub dakai_Click()
CommonDialog1.InitDir = "d:\"
CommonDialog1.Filter = "Word文件*.doc|*.*"
CommonDialog1.Action = 1
End Sub
为什么运行以后点击了不开D盘下的word文件无法确确实实打开呢?
如果这样编写确实打不开的话请问用什么方法可以打开想要打开的程序,我是入门级的所以请大家不要用太高级的方法 ..谢谢

各位大虾 能否给小弟一个打开D:\下word文件的方法
dakai_click()事件中该如何编写
谢谢

用commondialog控件是无法打开任何程序的，他只能把你选择的文件的路径放在属性filename和path里，要你自己通过其他手段来打开该文件，比如用shell函数来运行程序

这样确实不能真正打开你想打开的word文件，这只是vb提供的一个用于文件选择的界面，欲打开文件内容还需要具体的编程来实现。

Commondialog控件只是用来指定路径的一个控件而已,是无法打开文件的.如果你想通过调用 Office Word 打开,可以用以下方法:

Private 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 Long

Private Sub Command1_Click()
CommonDialog1.InitDir = "d:\"
CommonDialog1.Filter = "Word文件(*.doc)|*.doc"
CommonDialog1.Action = 1
If CommonDialog1.FileName <> "" Then ShellExecute 0&, vbNullString, CommonDialog1.FileName, vbNullString, vbNullString, 1
End Sub

通过CommonDialog只能取路径，你想让你的程序启动Word吧，Shell("C:\aa.doc", 1)或者加载动态链接库用ShellExecute

同意楼上的，呵呵