关于VB中路径的问题
有一图片 和 本程序在同一目录下 怎么用相对路径来表达
问题点数：10、回复次数：10Top
1 楼cslren（位流）回复于 2005-06-01 20:49:32 得分 0
app.path & "\" & 文件名
http://www.eob.cn/bbsTop
2 楼tmran（Rocky 爱瘦鱼）回复于 2005-06-01 20:57:20 得分 0
相对路径：
文件名（含后缀）
效果相当于：
app.path & "\" & 文件名Top
3 楼coralsoft（我是小虫虫~）回复于 2005-06-02 01:30:43 得分 0
如果用app.path & "\" & 文件名的话，有一种情况不行，比如文件名叫：abc.jpg，这个文件在c盘根目录：
app.path 返回的是：c:\，如果执行 app.path & "\abc.jpg" 的话，路径就变成：c:\\abc.jpg了。
可以用一个iif之类的或别的语句来：
app.path & iif( len(app.path) = 3, "abc.jpg", "\abc.jpg" )Top
4 楼wzzwwz（皮皮鲁）回复于 2005-06-02 07:47:38 得分 0
dim s as string
s=app.path
if right$(s,1)<>"\" then s=s & "\"
s=s & "abc.jpg"Top
5 楼zuoxingyu（激情成就梦想）回复于 2005-06-02 09:46:45 得分 0
楼上都说的很清楚了Top
6 楼moonz（追梦人：向星星迈进）回复于 2005-06-02 09:50:43 得分 5
app.path & iif(right(app.path,1) = "\", "", "\" ) & "abc.jpg"Top
7 楼niece（薇 我有新女人了）回复于 2005-06-03 21:28:44 得分 0
uopTop
8 楼cupid3973（毛）回复于 2005-06-04 09:03:24 得分 5
app.path & iif(right(app.path,1) = "\", "", "\" ) & PictureName
Top
9 楼lzanze（小泽）回复于 2005-06-04 12:36:21 得分 0
哈哈```这么简单的问题````对编程初学者是肯定会遇到的Top
10 楼xinghesnake（星河）回复于 2005-06-04 13:14:00 得分 0
if right(app.path,1)<>"\" then
s=app.path & "\" & "abc.jpg"
else
s=app.path & "abc.jpg"
end ifTop
