vb 添加VScrollbar 控制FORM窗体的上下

来源:百度知道 编辑:UC知道 时间:2024/05/14 09:26:47
我的窗体里的控件比较多 想加个上下滚动条来控制窗体 以便调程序可以看到更多的控件

有点麻烦,如果要是分别控制的话。
先添加一个容器控件(如Frame、Picturebox),然后把要移动的控件剪切到其中,并调好位置。
控制时只要调整容器的位置即可实现所有控件的移动。

Private Sub VScrollBar1_Scroll(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ScrollEventArgs) Handles VScrollBar1.Scroll
Me.Size = New Size(Me.Width, VScrollBar1.Value)
End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
With VScrollBar1
.Maximum = Me.Height
.Value = Me.Height
.Minimum = 100
.SmallChange = 2
End With

这样可以通过VScorllBar调节窗体的高度,不知道这是不是你想要的答案

个人的意见:如果一个窗体的控件太多,建议使用菜单或者工具栏。