Question

vb中怎么点击command1显示图片，怎么老是显示找不到文件啊

绝对路径是怎么回事啊
Private Sub Command1_Click()
Picture1.Picture = LoadPicture("F:\Photos\贴图\月.jpg")
End Sub

Answer 1

发来代码看看啊
你用的就是个绝对路径,就是说无论程序到哪台机器上必须有
F:\Photos\贴图\月.jpg的存在,不然程序认为没有 月.jpg 的文件而产生错误
相对路径是指根据程序的路径来判断
比如biq说的app.path它的含义是说当前运行的程序所在的路径
假如你的程序1.exe 存在于 c:\222\1.exe 那么
app.path的返回结果就是c:\222
如果程序1.exe存在与f:\photos\1.exe 运行1.exe时app.path的返回结果就是f:\photos
一般我们在安装程序时,安装的目录下会有Pic , Sound ,等等文件夹,
程序却仍然可以调用这些文件夹下的文件使用
比如你可以试试
msgbox app.path来看看返回值
然后将你的图片拷贝到你的程序所在的文件夹下
app.path & "\月.jpg"
或者在程序所在目录下新建一个文件夹Pic,然后
app.path & "\pic\月.jpg"

这是很常用的程序中调用图片的方法
还有一种方法,就是将图片资源放进image 控件中,与程序整合在一起,缺点是增加程序主体文件的大小,浪费运行程序时的系统资源,并设置image visable=false不可见
别的地方使用图片资源就调用image中的图片

你的方法很好也很通用,但如果图片文件被误删除掉了,文件不存在,就会导致程序运行的崩溃,所以最好加上 On Error的异常错误信息处理的代码

Answer 2

装载图片文件用绝对路径。
否则就：
Private Sub Form_Load()

ChDrive App.Path
ChDir App.Path

End Sub

再否则就不知了。

Answer 3

奇怪.我的怎么可以!