小问题:图片调用

Question

只要是涉及到放图片的程序,我一个也没成功过,帮帮偶了哦,谢谢 
  Private Sub form_load()
Caption = "装入窗体"
Picture = LoadPicture(App.Path + "\168.jpeg")
FontSize = 48
FontName = "隶体"
Print "装入窗体"
End Sub
运行时却出错了,显示是"文件未找到:'D：\VB98\VB例子\例子5\168.jpeg'"
我知道当前应用程序与当前图片要放在同一文件夹,我已经放在<例子5>中了却还是不行,这是为什么呀???

Answer 1

不会吧.FontSize = 48
FontName = "隶书"
Me.AutoRedraw = True
Print "装入窗体"
Private Sub form_load()
Caption = "装入窗体"
Picture = LoadPicture(App.Path + "\168.jpeg")
FontSize = 48
FontName = "隶书"
Me.AutoRedraw = True
Print "装入窗体"End Sub直接改为Picture = LoadPicture("D：\VB98\VB例子\例子5\168.jpeg")试试