VB程序设计第二版第五章课件.pptVIP

第5章 常用控件;5.1 控件分类;5.2 图 片 框;*;【例5-1】 窗体中，设计一个图片框，单击“加载”按钮时，图片加载到图片框中，如图5-2所示，单击“删除”按钮时，清空图片，如图5-3所示。;*;;(2)Autosize 属性 要使图片框控件能够自动调整大小以显示整幅图像，可以将其AutoSize属性设置为True。如果控件大小不足以显示整幅图像，VB则会自动裁剪图像，以适应控件的大小，但不能调整图片以适应控件的大小。;*;【例5-2】 在图片框中输出文字，以及作图，单击“输出文字”按钮，在图片框中输出“四川师范大学”，“中国人民”，单击“画圆”，则在图片框中画出圆，单击“清除”按钮时，将图片框中文字及图形清除。设置界面如图5-6所示运行效果如图5-7所示。;;“输出文字”的按钮代码： Private Sub Command1_Click() Picture1.Print 四川师范大学 Picture1.Print 中国人民 End Sub “画圆”的按钮代码： Private Sub Command2_Click() Picture1.Circle (1200, 800), 500 End Sub “清除”的按钮代码： Private Sub Command3_Click() Picture1.Cls End Sub ;5.3 图 像 框; 图像框控件的Stretch属性;;;;5.4 复 选 框;*;2．事件 复选框常用的事件为Click事件。运行时单击复选框，或在代码中改变复选框的Value属性值时，产生Click事件。 3.访问键 可用caption属性为复选框创建访问键快捷方式，只需要在作为访问键的字母前面加上连字符。 注意：要使标题包含连字符但不创建访问键，就应该使标题包含两个连字符（）。;;;;;5.5 框 架;*;5.6 单选 按 钮;1．属性 （1）Value： True——选中；False——没选中 （2）Alignment： 0（或vbLeftJustify）——文本左对齐； 1（或vbRightJustify）——文本右对齐。 （3）Style： 0（或vbButtonStandard）——旁边带有文本的圆形按钮； 1（或vbButtonGraphical）——与命令按钮相同的形状，还可以为其设置颜色或添加图形。;*;;其代码如下： “左对齐”代码： Private Sub Option1_Click() Text1.Alignment = 0 End Sub “居中”代码： Private Sub Option2_Click() Text1.Alignment = 2 End Sub “右对齐”代码： Private Sub Option3_Click() Text1.Alignment = 1 End Sub ;;;;;“确定”按钮的代码： Private Sub Command1_Click() If Option1.Value = True Then c1 = 成都 ElseIf Option2.Value = True Then c1 = 重庆 End If If Option3.Value = True Then m1 = 北京 ElseIf Option4.Value = True Then m1 = 上海 End If Text1.Text = 从 c1 到 m1 End Sub ;5.7 列 表 框;;（2）Style属性：返回或设置列表框的显示样式 （3）Columns属性：返回或设置列表框是按单列显示（垂直滚动）还是按多列显示（水平滚动）。;（4）Text属性：返回列表框中被选择的项目文本数据。Text属性为只读属性。 例如： List1.Text （5）ListIndex属性：返回或设置列表框中当前选择项目的索引，在设计时不可用。列表框的索引从0开始，如果没有在列表框中选择项目，则ListIndex的值为-1。 （6）ListCount属性：返回列表框中列表部分项目的总个数。 （7）Sorted属性：指定列表项目是否自动按字母表顺序排序。 True——按字母表顺序排序； False（缺省值）——不按字母表顺序排序。;（8）Selected属性：返回或设置在列表中的某项的选择状态。该属性在设计时不可用。List1.selected(i)，其中i 取值0到list1.listcount-1 （9）MultiSelect属性：返回或设