关于路径的问题，想好半天了……好痛苦……

Question

我用commondialog1.ShowOpen 打开后,我点一个文件,如何能获得它的路径?
  我用open "/CommonDialog1.FileName" for input as #1     时老提示找不到文件……
  如果路径的问题解决了，  open "路径" for input as #1    它可以读任意后缀的文件吗？

Answer 1

open "/CommonDialog1.FileName" for input as #1     换成open "CommonDialog1.FileName" for input as #1

Answer 2

dim Path as string
     with commondialog1
     .showopen
     path=.filename
end with
open path for input as #1
do until eof(1)
  line input#1,tmp
  text1.text=text1&tmp
loop
  close#1

Answer 3

没有用哦~showOpen后点文件，还是找不到文件。

Answer 4

好了~
可以了~~~
郁闷半天了~~HOHO
恩~~~

Answer 5

晕，引号去掉open CommonDialog1.FileName for .....

Answer 6

Private Sub Command1_Click()
' 设置“CancelError”为 True
CommonDialog1.CancelError = True
On Error GoTo ErrHandler
' 设置标志
CommonDialog1.Flags = cdlOFNHideReadOnly
' 设置过滤器
CommonDialog1.Filter = "All Files (*.*)|*.*|Text Files" & _
"(*.txt)|*.txt|Batch Files (*.bat)|*.bat"
' 指定缺省的过滤器
CommonDialog1.FilterIndex = 2
' 显示“打开”对话框
CommonDialog1.ShowOpen
' 显示选定文件的名字
MsgBox CommonDialog1.filename
Exit SubErrHandler：
' 用户按了“取消”按钮
Exit Sub
End Sub