在picture1里画picture2和滚动条,滚动条控制p
vb吧
全部回复
仅看楼主
level 5
在picture1里画picture2和滚动条,滚动条控制picture2显示,但我这个下滑滚动条显示完了picture2以后,还会显示很多空白,怎么回事啊?求大佬拜拜忙
Private Sub Picture1_Resize()
If Picture2.Height < Picture1.Height Then
VScroll1.Visible = False
Else
VScroll1.Visible = True
VScroll1.Min = 0
VScroll1.Max = Picture2.Height - Picture1.Height
End If
End Sub
Private Sub VScroll1_Change()
Picture2.Top = -VScroll1.Value
End Sub
Private Sub VScroll1_Scroll()
Picture2.Top = -VScroll1.Value
End Sub
2020年04月28日 07点04分 1
level 15
我怀疑是坐标单位的问题,你的窗体和图片框的ScaleMode都是一样的么?
2020年04月28日 07点04分 2
一样,都是1。两个图片框的属性都一样
2020年04月28日 10点04分
@想不出来ss 就是说没改过对吧……那是不是代码的执行时机有问题?你这里写的是Picture1_Resize,也就是外面的图片框改变大小时设置滚动条的属性,这符合你的预期么?
2020年04月28日 10点04分
@初音✨七奈 之前在忙着写论文,这个问题就暂时没看。用Resize是我在网上找的程序他用的是这个,我自己不知道应该用哪个[小乖],小白一个。应该是不符合预期吧,还是那个问题,显示完图片框2之后有大量空白
2020年05月05日 03点05分
@想不出来ss 我觉得你应该改成Picture2_Resize,就是改变里面的图片框大小时执行这段代码
2020年05月05日 03点05分
level 5
图片框的属性
2020年04月28日 10点04分 3
level 5
滚动条的属性
2020年04月28日 10点04分 4
level 10
建议把你的这个窗体文件传到网盘,
然后“分享”,把链接贴出来。
2020年04月28日 11点04分 5
就是随便画了一个图片框1,然后在他里面画一个更大的图片框二和一个滚动条,之后把那一段程序复制过去就行,我就是不知道滚动条怎么用,为啥会出现这种情况。感觉没必要发链接
2020年05月05日 02点05分
@想不出来ss 你要这么说,那只能说“代码没问题”。不过你应该注意,你的“参数初始化”代码写在Picture1_Resize()事件中,在“启动程序”时有触发机会吗?如果没有,应该在Form_Load()中主动调用一下这个过程才行。
2020年05月05日 12点05分
@想不出来ss 你可以在Picture1_Resize()过程的入口处设置断点,然后运行程序,看看这个过程“被执行”没有? 如果没有触发这个事件,也没有在启动程序时主动调用,那滚动条参数与两个PictureBox的大小是不匹配的,肯定会出现你的“问题”。
2020年05月05日 12点05分
1