Private Sub Form_Load()
Form1.Picture1.Picture = LoadPicture(App.Path & "\螺纹结构\螺纹1WS.bmp")
Form1.Picture2.Picture = LoadPicture(App.Path & "\螺纹结构\螺纹2WS.bmp")
Form1.Picture3.Picture = LoadPicture(App.Path & "\螺纹结构\螺纹4WS.bmp")
Form1.Picture4.Picture = LoadPicture(App.Path & "\螺纹结构\螺纹3WS.bmp")
Form1.Picture5.Picture = LoadPicture(App.Path & "\螺纹结构\螺纹5WS.bmp")
Form1.Picture6.Picture = LoadPicture(App.Path & "\螺纹结构\螺纹6WS.bmp")
Me.Left = (Screen.Width - Me.Width) / 2
Me.Top = (Screen.Height - Me.Height) / 2
End Sub
我用了同样的方法调图片怎么不好使呢 也试过把路径改成图片在电脑里的完整路径也不好用 是什么原因呢? 请高手帮帮忙哈