第5章循环结构设计(新)汇总.ppt

5.4 计时器和滚动条 5.4.1 计时器 5.4.2 滚动条 5.4.1 计时器 1.属性 Interval属性 Interval（时间间隔）属性用于设定计时器触发事件的时间间隔，单位为ms（0.001s），取值范围为0～65535ms。 若将Interval属性设置为0或负数，则计时器停止工作。 Enabled属性 Enabled（可用）属性是计时器的默认属性，用于设置计时器是否有效。 True ：默认值，而且Interval值大于0，计时器开始工作 。 False ：计时器则停止工作 。 5.4.1 计时器 2.事件 Timer事件 Timer事件以Interval属性指定的间隔时间发生，可将需要定时重复执行的操作放在该事件过程中完成。 当Enabled属性值为True且Interval属性值大于0时，计时器才能响应Timer事件。 5.4.1 计时器 3.示例 求1+2+3+…+10的累加和，使用计时器控件实现。 程序运行时单击“开始累加”按钮，实现1~10自然数的自动累加运算，并将计算结果动态地显示在Text1中。 【例5.12】设计要求 5.4.1 计时器 3.示例 在标题为“计时器”的窗体Form1上，添加一个文本内容为“00:00:00”的文本框Text1，其文字为小一号、居中显示；然后再添加两个标题分别为“开始”和“停止”的命令按钮Command1和Command2；最后添加一个计时器控件Timer1，其间隔时间为1秒，并设为非活动状态。程序运行时，单击“开始”按钮，计时器重新开始计时；单击“停止”按钮，计时器终止计时。 【例5.13】设计要求 5.4.2 滚动条 Max 滑块 Min 水平滚动条 垂直滚动条 滚动条的两端各有一个滚动箭头，在滚动箭头之间有一个滑块。 滚动条通常用于协助观察数据或确定位置，也可用作数据输入工具，用来提供某一范围内的数值供用户选择。 Value属性 Value（数值）属性是滚动条的默认属性，用于返回或设置当前滑块的位置，其值表示滚动条内滑块当前所处位置的值。 Value的值一定在Min和Max之间。 1.属性 5.4.2 滚动条 1.属性 Max属性 Min属性 Max（最大值）属性表示滑块处在最大位置所代表的值 。 Min（最小值）属性表示滑块处在最小位置所代表的值 。 该属性取值范围为-32768～32767。 该属性取值范围为-32768～32767。 5.4.2 滚动条 1.属性 LargeChange属性 SmallChange属性 LargeChange（大改变）属性用于设定当用户用鼠标单击滚动条的滚动箭头和滑块之间的空白区域时，滑块移动的增量值。 SmallChange（小改变）属性用于设定当用户用鼠标单击滚动条两端箭头时，滑块移动的增量值。 5.4.2 滚动条 2.事件 当改变滚动条Value属性值时触发Change事件 按住鼠标并且拖动滚动条的滑块时触发Scroll事件 Change事件 Scroll事件 Scroll事件与Change事件的区别在于：当滚动条的滑块滚动时Scroll事件一直发生，而Change事件只是在滚动结束后发生一次。 5.4.2 滚动条 3.示例 求1+2+3+…+10的累加和，要求结合滚动条控件实现。 程序运行时单击“累加”按钮，实现1~10自然数的累加运算，累计项的变化通过水平滚动条HScroll1的滑块体现，并将累加结果显示在Text1中。 【例5.14】设计要求 Sum = 0 For i = HScroll1.Min To HScroll1.Max Sum = Sum + i HScroll1.Value = i Next i 5.4.2 滚动条 3.示例 【例5.15】设计要求 程序运行时，当改变水平滚动条HScroll1的滑块位置时，可以改变Text1的字体大小；当拖动垂直滚动条VScroll1的滑块时，可以改变Text1的字体颜色。 5.5 循环结构的应用举例 程序运行时，在Text1和Text2中输入两个正整数，单击“最大公约数”按钮，求这两个整数的最大公约数并显示在Text3中；单击“最小公倍数”按钮，求这两个整数的最小公倍数并显示在Text4中。 【例5.16】设计要求 5.5 循环结构的应用举例 程序运行时，HScroll1的滑块处于滚动条的最右端，HScroll1的滑块按计时器触发频率自动向左移动，同时文本框Text1在水平方向以相同速度折叠；当滑块移到最左边时，滑块则开始向右移动，同时Text1在水平方向展开。此外，改变垂直滚动条VScroll1滑块位置会改变HScroll1