说的简单点就是:
Image1.Picture = LoadPicture("E:\图形图象\" & List1.List(z) & ".jpg")
在着条语句中图片的地址是固定的我的项目要考到别人那里就不一定是着个路径了
是用什么才可以使他自己找路径的啊

............
("E:\图形图象\" & List1.List(z) & ".jpg")

你改下.不要给固定格式.

用VB的App对象

加入一个CommonDialog控件
在你的过程里加入
CommonDialog1.Filter = "jpg(*.jpg)|*.jpg"
CommonDialog1.ShowOpen
CommonDialog.filename '是用户选择的文件名

app.path ..