重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
将RTF的Padding设置比较大,例如10,此时我发现鼠标移动到RTF的边缘部分的时候(不超过Padding的范围),滚动条就能够显示,一旦鼠标移动到Content里面的时候,滚动条就不显示
专注于为中小企业提供网站建设、成都网站制作服务,电脑端+手机端+微信端的三站合一,更高效的管理,为中小企业常州免费做网站提供优质的服务。我们立足成都,凝聚了一批互联网行业人才,有力地推动了上千多家企业的稳健成长,帮助中小企业通过网站建设实现规模扩充和转变。
1、滚动条分为水平滚动条(HSCROLLBAR)和垂直滚动条(VSCROLLBAR)两种,可以作为输入设备或者速度、数量的指示器来使用.
2、基本属性:object.max[=value],object.min[=value],最大最小范围 object.value[=value],
建立滚动条的方法如下:
(1)将鼠标移到ToolBox内的WinForm标签页的HscrollBar控件上,单击鼠标左键。
(2)将指针移至窗体中适当的位置,按住鼠标左键并拖动鼠标将HscrollBar控件调整到合适的大小放开左键。
(3)同样,再在Form上设置一个VscrollBar控件。
Private Sub Form_Load()
Me.Caption = "改变字号"
HScroll1.Min = 12
HScroll1.Max = 72
Label1.Caption = "心想事成"
End Sub
Private Sub HScroll1_Change()
Label1.FontSize = HScroll1.Value
End Sub
Private Sub Text1_Change()
If Len(Text1.Text) 2 Then
Text1.Text = Left(Text1.Text, 2)
End If
If Val(Text1) = 12 And Val(Text1) = 72 Then
Label1.FontSize = Val(Text1.Text)
End If
End Sub
vb适当设置滚动条的大小和位置通过以下参数实现:
说明;滚动条控件(ScrollBar)分为水平滚动条(HScrollbar)和垂直滚动条(VscrollBar)二种,通常附在窗体上协助观察数据或确定位置,也可用作数据输入工具,用来提供某一范围内的数值供用户选择。
1、属性
(1) Value
滑块所处位置所代表的值。
(2) Max:最大值
-32,768~32,767
(3) Min:最小值
-32,768~32,767
(4) SmallChange
最小变动值,
单击箭头时移动的增量值。
(5) LargeChange
最大变动值,单击空白处时移动的增量值。
2、事件:
1)Change事件
滚动条的Change事件在移动滚动框或通过代码改变其Value属性值时发生。单击滚动条两端的箭头或空白处将引发Change事件。
(2)Scroll事件
当滚动框被重新定位,或按水平方向或垂直方向滚动时,Scroll事件发生。拖动滑块时会触发Scroll事件。
Scroll事件与Change事件的区别在于:当滚动条控件滚动时Scroll事件一直发生,而Change事件只是在滚动结束之后才发生一次。
思路:
利用几个可以作为容器的控件,添加滚动条就可以了:
我举个例子:(这个问题我记得回答过的!)
添加1个PicTureBox1,作为容器
在PicTureBox1里添加PicTureBox2,在窗体上添加一个垂直滚动条。
把你所谓的许多控件放到PicTureBox2里,滚动条改变的是PicTureBox2在PicTureBox1里的Top属性,我想你通过一定的空间想象力,可以想到效果了吧?
注意:默认状态设置PicTureBox2的Top属性为0,当该属性为负值的时候,PicTureBox2显示的效果是向上移动,即下面原来隐藏的内容为可见了。
要设置PicTureBox2的AutoRedraw 属性为True。
若要左右移动效果,那么改变其 Left 属性,原理不再赘述了。