控件的一个属性的问题,帮忙解决!50分相送

areyoupig 2005-03-25 10:07:12
我制作的一个控件,里面涉及到一个图形
就是有一个picture属性
我希望做得和image的picture属性一样,只要点一下,就自动打开文件,然后把图片读进来,并且保存
这个属性好难做啊
请帮我一下
就是一个获得图形并且保存的属性
各位有代码的,请告诉我一下
我要制作一个按扭控件
按扭有图片,不会处理了!
...全文
83 点赞 收藏 3
写回复
3 条回复
areyoupig 2005年03月25日
太感谢了,谢谢!
回复 点赞
yunyu97 2005年03月25日
'在你的控件代码中加入如下的代码。
Public Property Get Picture() As Picture
Set Picture = Picture1.Picture
End Property

Public Property Set Picture(ByVal New_Picture As Picture)
Set Picture1.Picture = New_Picture
PropertyChanged "Picture"
End Property

'Load property values from storage
Private Sub UserControl_ReadProperties(PropBag As PropertyBag)
Set Picture = PropBag.ReadProperty("Picture", Nothing)
End Sub

'Write property values to storage
Private Sub UserControl_WriteProperties(PropBag As PropertyBag)
Call PropBag.WriteProperty("Picture", Picture, Nothing)
End Sub

回复 点赞
aiur2000 2005年03月25日
StdPicture属性试试
回复 点赞
发动态
发帖子
VB基础类
创建于2007-09-28

2744

社区成员

19.7w+

社区内容

VB 基础类
社区公告
暂无公告