vb中怎样给控件初始化,就是回到刚打开的状态。
我添加了两个Picture控件按钮Picture1.picture=Picture2.picture之后怎样变回到原来Picture1啊!不要再加个Picture控件中转...
我添加了两个Picture控件
按钮Picture1.picture = Picture2.picture
之后怎样变回到原来Picture1啊!不要再加个Picture控件中转
有什么办法吗?
是变回到Picture1原来替换前的图片 展开
按钮Picture1.picture = Picture2.picture
之后怎样变回到原来Picture1啊!不要再加个Picture控件中转
有什么办法吗?
是变回到Picture1原来替换前的图片 展开
展开全部
Dim tmpPic As New StdPicture '这些在通用部分
Private Sub Command1_Click() '改变picture1的图片
Set tmpPic = Picture1.Picture
Picture1.Picture = Picture2.Picture
End Sub
Private Sub Command2_Click() '恢复picture1的图片
Picture1.Picture = tmpPic
End Sub
Private Sub Command1_Click() '改变picture1的图片
Set tmpPic = Picture1.Picture
Picture1.Picture = Picture2.Picture
End Sub
Private Sub Command2_Click() '恢复picture1的图片
Picture1.Picture = tmpPic
End Sub
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询