Private Sub Command1_Click()Image1.Picture = LoadPicture("F:\工具\QQ大全\图片\15.jpg")End Sub要加上图片的格式例如我上面的15.jpg
image1.picture=loadpicture("f:\工具\qq大全\图片\15.jpg")你图片的格式是什么·我这里写的是jpg
