Visual_Basic语言程序设计教程 教学课件 作者 周冰 邓娟 刘芳 第8章常用标准控件.pptVIP

8.5 图形控件 2）FillStyle属性：设置填充效果。属性值取值0—6，默认值为1。 属性值 说明 0 实心 1 透明 2 水平线 3 垂直线 4 斜线（左上右下） 5 斜线（右上左下） 6 十字线 7 交叉斜线 8.3 滚动条 滚动条通常用来浏览内容或确定位置，也可以作为数据输入的工具。在实际应用中，滚动条也常用作数量、速度的指示器，如在一些多媒体应用中用来控制音量、画面的滚动速度等。 滚动条分为水平滚动条（HScroll）和垂直滚动（VScroll）两种类型。 滚动条的结构 两端各有一个滚动箭头，在滚动条上有一个能够移动的小方块，叫做滚动滑块； 水平滚动条的最小值在最左边，最大值在最右边，从左向右移动时，值依次递增； 垂直滚动条的最小值在最上边，最大值在最下边，从上向下移动时，值依次递增。 8.3 滚动条 滚动条控件的属性 Max：设置滚动条的最大值。最大值为滚动滑块在右（或下）端时的值，其值介于-32768到32767之间，Max的默认值为32767。 Min：设置滚动条的最小值。最小值为滚动滑块在左（或上）端时的值，Min的默认值为0。 Value：表示滚动滑块所在位置对应的值。如果用户拖动滑动块，Value属性值随之改变，它是滚动滑块的位置与最大值、最小值换算而得的结果，取值范围为Min～Max。 8.3 滚动条 滚动条控件的属性 LargeChange：设置鼠标单击滚动条中间的空白处时，每次增加和减少的数值。系统默认的数值为1，取值范围为1～32767，用户可以自己修改 SmallChange：设置鼠标单击滚动条两边的箭头时，每次增加和减少的数值。系统默认的数值为1，取值范围为1～32767，用户可以自己修改。 8.3 滚动条 滚动条控件的事件 滚动条控件的常用事件有Scroll事件和Change事件。 Scroll（滑动）事件 单击滚动箭头或单击滚动条均不能触发该事件，仅在移动滚动滑块时被触发。一般可用该事件来跟踪滚动条的动态变化。 Change（变化）事件 单击滚动箭头、单击滚动条或移动滚动滑块时均可触发该事件。一般可用该事件来获得移动后滚动条的最后值。 滚动条应用 ?利用水平滚动条和垂直滚动条的滚动，分别改变标签中文字的字体和颜色。 对象 属性 属性值 Label Name Label1 Caption 滴水穿石 HScrollBar Name HScroll1 Max 48 Min 8 VScrollBar Name VScroll1 Max 3 Min 1 Label Name Label2 Caption 字体颜色 Label Name Label3 Caption 黑体 Label Name Label4 Caption 宋体 Label Name Label5 Caption 隶书 界面设计 ： 滚动条应用 Private Sub HScroll1_Change() Label1.ForeColor = RGB(Rnd*255,Rnd*255,Rnd*255) End Sub Private Sub VScroll1_Change() Select Case VScroll1.Value Case 1 Label1.Font = 黑体 Case 2 Label1.Font = 宋体 Case 3 Label1.Font = 隶书 End Select End Sub 8.4 计时器 计时器是一个非常有用的控件，主要有两个功能： 用于在程序中监视和控制时间进程，即每隔一段固定的时间就有规律地执行一次相同的任务。如定时检测系统或控件的状态、控制控件的移动、设置时钟、倒计时、秒表等； 进行某种后台处理。 因为计时器控件在设计时可见，运行时隐藏，所以它在界面上的位置和大小无关紧要。但在后台每隔一定的时间，系统就会自动触发一次计时器事件。 8.4 计时器 计时器控件的属性 Enabled（响应）属性 功能：设置计时器控件是否开始计时。语法格式： 其中，属性值为True（默认值）表示启动计时器开始计时；属性值为False则表示暂停计时器的使用，待将Enabled属性设置为True时继续运行计时器。 Interval（间隔）属性 功能：设置两个计时器事件之间的时间间隔。 设置时以毫秒（ms）为单位，范围是0～65 535ms，系统初始值设置为0。若希望每秒执行n个计时器事件，则将Interval属性的值设置为1000/n。 当Interval属性的值为0时，则计时器无效。 对象名.Enabled={True | False} 对象名. Interval=数值 8.