大侠们,我用通用对话框CommonDialog1打开一个文件,怎么才能把这个文件的完整路径赋值给一个字符串变量?

解决方案 »

  1.   

    strData=commondialog1.filename不就行了吗!
      

  2.   

    试试这个:
      CommonDialog1.ShowOpen
      If CommonDialog1.FileName <> "" Then
        i = Len(CommonDialog1.FileName)
        While Mid(CommonDialog1.FileName, i, 1) <> "\"
          i = i - 1
        Wend
        strfullpath = Left(CommonDialog1.FileName, i)
        MsgBox strfullpath
       End If
      

  3.   

    试试这个:
      CommonDialog1.ShowOpen
      If CommonDialog1.FileName <> "" Then
        i = Len(CommonDialog1.FileName)
        j=len(commondialog1.filetitle)
        i=i-j-1
        strfullpath = Left(CommonDialog1.FileName, i)
        MsgBox strfullpath
       End If
    上次看错了,呵呵!
      

  4.   

    strData=commondialog1.filename就可以了,但要做的完善一点,还是使用程序