Option Explicit
Private dw As PictureBox
Private picpath As String Public Property Let pth(ByVal str As String)
picpath = str
End Property
Public Sub chuli()
dw.Picture = LoadPicture(picpath)
End Sub
为什么dw.Picture = LoadPicture(picpath)出现错误,这是放在类中的代码,谢谢
Private dw As PictureBox
Private picpath As String Public Property Let pth(ByVal str As String)
picpath = str
End Property
Public Sub chuli()
dw.Picture = LoadPicture(picpath)
End Sub
为什么dw.Picture = LoadPicture(picpath)出现错误,这是放在类中的代码,谢谢
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货