物理教学的计算机辅助-成化高中.ppt

* * * * * * * 1. 共有的重要属性 (P：可在程序中设置或引用，D：可在设计状态设置。) List ：PD 字符型数组，存放列表框的项目，下标是从0开始。 ListIndex：P 选中的项目的序号，没有项目被选定时为-1 ListCount：P 项目的数量，ListCount-1是最后一项的下标。 Sorted：D True：按字母顺序排列。 False：按加入先后顺序排列。 Text：P 列表项中被选定的内容， List 1.List(List 1.ListIndex) = List1.Text。 * * 2. 列表框的特有属性 Selected：P 逻辑数组。 Selected(i)的值为True表示第i+1项被选中。 MultiSelect 0-None：禁止多项选择。 1-Simple：简单多项选择。 2-Extended：扩展多项选择。 3. 列表框的特有属性 Style 类型 Style 输入 下拉式组合框 0 能 简单组合框 1 能 下拉式列表框 2 不能 * * 4. 方法 AddItem 对象.AddItem item [, index] RemoveItem 对象.RemoveItem index Clear 对象.Clear 5. 事件 列表框：Click、DblClick。 组合框：Click，只有简单组合框才有DblClick事件。 一般不需要编写Click事件过程。 通常在单击命令按钮或发生DblClick事件时才读取Text属性。 * * 例7.3 对列表框进行项目添加、修改和删除操作。 例7.4 对列表框进行项目添加、修改和删除操作。 * * 7.4 滚动条和Slider控件 共同具有的重要属性 Max：最大值 -32 768~32 767 Min：最小值 -32 768~32 767 SmallChange 最小变动值，单击箭头时移动的增量值。 LargeChange 最大变动值，单击空白处时移动的增量值。 Value 滑块所处位置所代表的值。 水平滚动条 垂直滚动条 SmallChange Min Value Max SmallChange LargeChange LargeChange Slider控件 * * 事件： Scroll：拖动滑块时会触发Scroll事件。 Change：Value属性改变时触发Change事件。 例7.5 用一个文本框(txtSpeed)显示滚动条(hsbSpeed)滑块当前位置所代表的值。 例7.6 调色板程序。 Sub hsbSpeed_Change() Text1.Text= HScroll1.Value End Sub 例7.7 用Slider控件设置文本框中的字体大小。 * * 时钟控件以Interval为时间间隔产生 Timer事件。 属性 Interval属性 单位：ms(0.001s)，0.5秒是500。 Interval＝0：屏蔽计时器。 Enabled属性 True：有效计时 False：停止时钟工作 事件 Timer 例7.8 定时的闹钟 例7.9 蝴蝶飞舞 7.5 时钟(Timer) * * 例7.10 用进度条指示一个大数组的计算进度。 7.6 ProgressBar控件 位于Microsoft Windows Common Control 6.0部件。 重要属性： Max、Min：该控件的界限。 Value：决定控件被填充多少。 * * 位于Microsoft Windows Common Control-2 6.0。 通常与伙伴控件 “捆绑”在一起使用。 UpDown应用示例。 7.7 UpDown控件 * * 位于Microsoft Windows Common Control-2 6.0。 属性： Center：决定动画是否在控件的中央播放。 AutoPlay属性：决定在用Open方法打开文件时是否自动播放。 方法： Open：打开文件； Play： 播放动画； Stop： 停止播放； Close：关闭文件。 例7.11 为例7.10配上动画。 7.8