Question

vb中打开一张图片怎么获取图片所在文件夹

比如图片文件时c\ss\1.jpg我想获得c\ss怎么弄

Answer 1

Dim str1 As String

Dim str2 As String

Dim str3 As String

Dim ln1 As Long

str1 = CommonDialog1.FileName

str2 = CommonDialog1.FileTitle

ln1 = Len(str1) - Len(str2) - 1

str3 = Left(str1, ln1)

Form1.Print str3

Answer 2

Set fs = CreateObject("Scripting.FileSystemObject")
msgbox fs.GetParentFolderName("c\ss\1.jpg")

追问

打开一张图片图片的路径怎么获得啊

Answer 3

汗!你打开它的时候都知道它在在哪个文件夹了,我快晕了,你不知道路径怎么打开呢,用IE浏览器的搜索功能可以找到