第七章常南用控件.pptVIP

第七章 常用控件 常用控件 这里将介绍VB标准控件中的常用控件，主要有： 单选钮(OptionButton) 复选框(CheckBox) 框架(Frame) 列表框(ListBox) 组合框(CheckBox) 时钟（Timer) 列表框应用举例 例7.4 设计一个程序运行界面如下图： 界面及控件设计 代码设计（一） 代码设计（二） 图像(Image)和图片(Picture Box) 图片框控件的主要事件： 图片框和图像都可以接收 Click（单击）事件与 DblClick（双击）事件。 图片框的方法 图片框还可以使用 Cls（清屏）、Print 方法。 例如：在图片框上打印和清除文本。 Picture1.Print “这是在图片框上打印文本” Pictrue1.Cls 图片框应用举例 例7.8 编写程序，交换两个图片框中的图形。 图片框应用举例 Private Sub Form_Click() 交换图片 Picture3.Picture = Picture1.Picture Picture1.Picture = Picture2.Picture Picture2.Picture = Picture3.Picture 第三个图片框设置为空 Picture3.Picture = LoadPicture() End Sub Silder控件 Silder控件 Silder控件 Silder控件 应用举例 例7.9 界面及控件设计 UpDown控件 UpDown控件是一种Windows应用程序中常见的控件，它往往与其它控件“捆绑”在一起使用，方便用户修改与它关联的伙伴控件。 UpDown控件的属性 ① BuddyControl属性 设定与之关联的伙伴控件，类型为文本型。例如，如果要设置当前一个文本框Text1与之关联，则BuddyControl属性设置为“Text1”。 ② BuddyProperty属性 BuddyProperty属性设置为其伙伴控件的可滚动属性。例如，如果一个文本框Text1为其伙伴控件，则可为BuddyProperty设置为text（Text1控件的滚动属性）属性。 ③ Min属性： 设置UpDown控件的下界值，类型为数值型。 UpDown控件的属性 ④ Max属性： 设置UpDown控件的上界值，类型为数值型。 ⑤ Value属性: 设置或获得控件在滚动范围内的当前值。 ⑥ Wrap 属性： 决定当最终用户输入的值超过 Min 或 Max 值时，是否会折回。 UpDown控件的属性 ⑦ Increment属性： 指定在每次单击上箭头或下箭头时 Value 属性的变化量。 ⑧ AutoBuddy 属性： 自动设置伙伴控件。在设计时，如果将 AutoBuddy 属性设置为 True，那么 UpDown 控件自动把 TabOrder 中位于它前面的控件作为它的“伙伴”。 UpDown控件的事件 ① Uplick 和 DownClick 事件： 当鼠标单击上箭头时触发UpClick事件，单击下箭头时触发DownClick事件。 ② Change事件： 当鼠标左键在上下箭头上按下时触发Change事件。 UpDown控件应用举例 例7.10 编写程序，用UpDown控件来控制文本框中数据的变化。 程序运行界面如下：单击上下微调按钮可改变文本框中的数值 UpDown控件应用举例 所用控件及属性设置如右表 UpDown控件应用举例 程序不用编写事件过程代码。 单击上下微调按钮可改变文本框中的数值，数值范围为（-10至10） Animation控件 UpDownAnimation控件用来显示无声的AVI视频文件，播放无声动画。它位于Microsoft Windows Common Control-2 6.0部件中。 Animation控件的属性 ① AutoPlay属性： 如果AutoPlay为True，则用Open打开文件时自动播放，否则需要用Play方法来播放。 ②Center属性： 如果Center为True，则动画在控件的中央播放。 Animation控件的方法 ① Open方法： 用于打开AVI文件，格式是：对象.Open(视频文件名)。 ② Play方法： 播放打开的AVI文件。 Play方法有三个参数，即repeat、start和stop，它们决定文件被播放多少遍，从哪一帧开始播放，到哪一帧停止。如果没有提供repeat参数，文件将被连续播放。 ③ Stop方法: 停止播放，格式是：对象.St