VB如令图片跟着滚动条移动而移动
做VB作业发现调试程序后发现图片并没有显示出来滚动条就会动可是图片没有显示出来请求各位大神帮忙谢谢急！！！...
做VB作业 发现调试程序后发现图片并没有显示出来 滚动条就会动 可是图片没有显示出来 请求各位大神帮忙 谢谢 急！！！
展开
1个回答
展开全部
'这里图片用Picturebox显示
Private Sub Form_Resize()
HScroll1.Max = ScaleWidth - Picture1.Width
HScroll1.Min = 0
HScroll1.LargeChange = Picture1.Width
HScroll1.SmallChange = Picture1.Width \ 10
On Error Resume Next
HScroll1.Value = Picture1.Left
End Sub
Private Sub HScroll1_Change()
Picture1.Left = HScroll1.Value
End Sub
复制上去就可以了
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
|
广告 您可能关注的内容 |
