VB中如何使用CommonDialog控件获取当前的路径,不要包含文件名。_百度...

发布网友

我来回答

共2个回答

热心网友

With CommonDialog1
.ShowOpen
当前的路径 = Left(.FileName, InStrRev(.FileName, "\") - 1)
End With

热心网友

A = Mid(CommonDialog1.FileName, 1, Len(CommonDialog1.FileName) - Len(CommonDialog1.FileTitle)) '获取路径不包括文件名

热心网友

With CommonDialog1
.ShowOpen
当前的路径 = Left(.FileName, InStrRev(.FileName, "\") - 1)
End With

热心网友

A = Mid(CommonDialog1.FileName, 1, Len(CommonDialog1.FileName) - Len(CommonDialog1.FileTitle)) '获取路径不包括文件名