第6章常用控件6.1.1单选按钮、复选框及框架例[6-2]用单选按钮和复选框设置文字的字体字形。2.框架例［6-4］框架的应用示例（如下图）。6.1.2列表框和组合框列表框各主要属性的值：List1.ListIndex=3(下标从0开始的)List1.ListCount=5List1.Selected(3)=True，其余为False。List1.Sorted=False，没有排序。List1.Text为“cox”，与List1.List(List1.ListIndex)相等（2）主要事件Click、DblClick（3）主要方法①AddItem方法格式：列表框名.AddItem项目字符串［，位置值］该方法是将项目字符串所指定的一个项目插入到由位置值所指定的位置上。每插入一项ListCount属性值都会自动加1。位置值可以从0到ListCount-1变化。若省略位置值，则新增项目添加到列表框最后面。②Clear方法格式：列表框名.Clear该方法用于清除列表框中的所有项目，此时ListCount属性值置0。③RemoveItem方法格式：列表框名.RemoveItem位置值该方法将指定位置上的项目从列表框中删除，此时ListCount属性值自动减1。例［6-6］列表框项目添加和删除示例（如下图）。（1）主要属性Style（2）主要事件Style=0时，可响应Click、Change和Dropdown事件。Style=1时，可响应Click、DblClick和Change事件。Style=2时，可响应Click和Dropdown事件。（3）主要方法AddItem对象.AddItemitem[,index]index:0～ListCount-1.每插入一项ListCount自动加1RemoveItem对象.RemoveItemindex该方法将指定位置的项目删除，同时ListCount自动减1Clear对象.Clear清除所有项目，ListCount置0例[6-7]组合框示例（如下图）。6.2滚动条2.主要事件Scroll:拖动滑块时触发。Change：滚动条内滑块位置改变时发生。例[6-9]设计一个用于设置速度的滚动条。6.3时钟6.4图形控件图片框的Autosize属性：决定控件是否自动适应图片的大小true：图片框自动调整大小适应图片。false：图片框不能自动调整大小，加载的图形保持其原始尺寸。2.图像框图像框(Image)作用与图片框类似，区别在于：①图片框可以作为其它控件的容器②图片框可以通过Print方法显示文本③图像框比图片框占用内存少，显示速度快图像框的Strech属性：决定图片是否自动适应控件的大小true：被加载图形自动调整大小适应图象框的大小。false：图象框自动调整大小适应加载的图形。例［6-12］图片框示例。在窗体Form1上画一个图片框，名称为P1，高为1900，宽为2400。请编写适当的事件过程，使得在运行时，如果单击窗体，则装入D盘下的文件名为Pic1.bmp的图片，如下图所示；如果双击窗体，则图片框中的图片消失。程序代码如下：PrivateSubForm_Click()P1.Picture＝LoadPicture(″D：\Pic1.jpg″)EndSubPrivateSubForm_DblClick()P1.Picture＝LoadPicture(″″)EndSub例［6-13］交换图形。编写程序，交换两个图像框中的图形。建立程序界面如图所示。在窗体上建立三个图像框，一个命令按钮。然后进行属性设置。程序代码如下：PrivateSubCommand1_Click()Image3.Picture=Image1.PictureImage1.Picture=Image2.PictureImage2.Picture=Image3.PictureEndSub6.4.2形状和直线1.形状形状控件（Shape）用来画矩形、正方形、椭圆、圆、圆角矩形及圆角正方形。通过设置Shape属性可以得到需要的图形。Shape属性设置值如下表所示：2.直线直线控件（Line）用来画水平线、垂直线或对角线。通过设置该控件的位置、长度、颜色、宽度、线型等属性可以产生不同风格、颜色的直线。直线控件的主要属性如下：①BorderStyle:用于设置属性的类型，它的属性设置如下表：②BorderWidth：用于设置线条的宽度，即线条粗细。③BorderColor：用于设置线条颜色。④X1、X2、Y1、Y2：用于设置直线的起点和终点。在运行时，要移动或调整直线控件大小，可以通过改变X1