问个VB高手通用对话框的问题

来源：百度知道 编辑：UC知道 时间：2024/05/18 20:20:46
比如commondialog1.showopen,这时commondialog1.filename是打开文件的祥细目录,我怎么能取得所打开文件的目录呢?即不带文件的那些字符串

Left(commondialog1.filename, InStrRev(commondialog1.filename, "\") )
这样就取得路径了，（去除了文件名）

filename本来就是文件名,自然会包括文件的名字.如果不想要filename,就用DirListBox控件吧.

是可以的，不过麻烦一点，要用到Mid函数。
'Form中放一个CommonDialog，命名CD1。一个按钮，不用改名。

Private Sub Command1_Click()
CD1.ShowOpen
MsgBox Mid(CD1.FileName, 1, Len(CD1.FileName) - Len(CD1.FileTitle))
End Sub

嘿嘿，看到了没？这就是程序目录了~~~~~~
满意就追点分~~~~