VB获取文件的绝对路径，如何在VB中获取当前程序的绝对路径

你可以把应用程序和你想吃的参数文件放在同一个目录下，这样即使你把它移到另一台电脑上也可以这样做。

如：文件。 flv

首先获取参数文件的车轮信誉。

将 curfile 调暗为 stringcurfile= + 文件。 flv"

curfile=" "+curfile '换成串，注意后面的空格做通音！

然后执行你的 shell curfile， vbnormalfocus

spath = c：绝望的饥饿在文本腐烂而宽阔的道路上闪耀。 flv"

if left(mid(spath, 10), 2) =then shell spath

这样，检测路径更准确，检测。 exe 空格后 2 个字符（如果是）"：将执行 shell 语句模仿。

;示例：C：测试

示例：C：测试

绝对路径。 是直接到达目标位置的路径，通常从驱动器号开始。 完整说明文件位置的路径是网站根目录的绝对路径。

引用所基于的目录路径。

绝对路径名是从树平衡模式顶部的根目录到目录或文件的拆分路径，由一系列连续的和盲的目录组成，中间用斜杠分隔，直到要指定的目录或文件，路径中的姓氏是要指向的目录或文件。 术语“绝对”意味着当所有网页引用同一文件时，使用的路径是相同的。

楼上是正确的解决方案，净和非常不同。

'编写一个函数，获取。

private function getlujin(byval a as string) as string

dim i as long

for i = len(a) to 1 step -1if mid(a,i,1) = "\" then '获取最后一个"\"位置。

getlujin = left(a,i-1) '该函数返回最后一个"\"前面有什么东西。

exit function '获取后，函数没问题，如果出现

next i

end function

dim s as string

dim is="d:\123\123\asd\"

i=instrrev(s,"\") ''最右边的字符位置。

s =left$(s, i-1) ''s 是路径（文件夹）d：123 123 ASD

s ''显示 D： 123 123 ASD