Question

为什么vb无法加载图片？ 路径没错。

为什么vb无法加载图片？
路径没错。

Answer 1

app.path & "\bmp\" & ... 自己补充后面的哈 最好是 用dir函数测试路径是否有效 然后才加载图片
if dir(路径)<>"" then

追问

app.path没用

追答

图片太模糊

追问

我只是想说路径没错，错误代码是76，未找到路径

追答

你可以 msgbox "路径" 把路径显示出来 看看到底哪里不对了
我大约能看到你 文件的后缀名 是没有显示出来的 看看是否能和代码中的一致

追问

显示出的路径无误

还有我有时能加载出来，但大多时候不行

win XP有时能加载出来，win7一次都没加载出来过

追答

win7的话 一般是文件夹权限问题
你可以将工程文件放到非系统盘试试

追问

在U盘里

追答

dim s as string
s=app.path & "\bmp\" & trim(duqu(k)) & ".bmp"
if dir(s)"" then
img.picture=loadpicture(s)
img.visible=true

else
msgbox "路径:" & s & " 错误"

exit sub

end if

追问

挺有用的，我把你的代码和我的代码写在同一个程序里，我的出错了，你的没有，这是什么原因