神马品牌网建设工程项目流程:VB list 中文件打开的问题
来源：百度文库 编辑：神马品牌网 时间：2024/04/28 03:56:15
用VB实现文件快速查找，并在list中显示路径，如：“c:\windows\hh.doc”，但是如何实现双击所显示的路径就能打开文件呢？
希望各位高手不耻下“教”。小弟拜谢。。。。
希望各位高手不耻下“教”。小弟拜谢。。。。
先实现在LIST中的添加：
dim filename as string
filename=dir(c\windows\*.doc)
while filename<>""
list.additem(filename)
filename=dir
wend
然后打文件：
先引用word.application组件，
通用部分声明：public wordapp as word.application
Private Sub List1_DblClick()
set wordapp=new word.application
wordapp.visible=true
wordapp.documents.open(list.text)
End Sub
祝你成功！