第7章+Visual+Basic常用控件

1、第7章 Visual Basic常用控件,开发应用程序的第一步就是在窗体上安排所需的控件，并设计出各控件相应的属性、方法和事件代码，来完成用户界面的设计。因此了解和掌握各控件相应的属性、方法和事件是非常有必要的，第二章已介绍过几个常用控件，本章将逐个介绍其他几个常用控件的使用。,命令按钮（CommandButton）,文本框（TextBox）,标签（Label）,窗体（Form）,窗体的常用属性,名称（Name）：窗体对象引用名，默认为Form1。 Caption：标题属性，默认为窗体名。与Name属性的区别。 Icon：图标属性（图片) BackColor、ForeColor：窗体的背景和前

2、景色。 BorderStyle：窗体边框属性。 Enabled：活动属性。缺省为“True”。 Visible：可视属性。缺省值为“True”。 Font：设置字体、字型、字号等）（多个控件可一起） Left、Top：决定窗体相对于显示屏位置的属性。(单位：特维） Height、Width：决定窗体大小的属性。 Picture：用于设置窗体显示的图片。,窗体的常用事件,Click：单击窗体时触发。 DblClick：双击窗体时触发。 Load：使用Show方法显示窗体时触发。,窗体的常用方法,Hide：隐藏方法。 Show：显示方法。 Cls ：清除方法。 Print：打印方法。,Print方

3、法举例,Private Sub Form_Click( ) Print a; b; c 紧凑格式 Print d, e, f 标准格式 Print 空一行 Print g, h, i End Sub,示例,标签（Label）,主要用于在窗体上增加文字说明。 标签有多种属性、事件和方法。,属性 Caption：标签标题。为标签中具体内容。 Alignment：对齐属性。 AutoSize：大小自动适应属性。缺省值为“False”。 BackStyle：背景风格（透明与否）。缺省值为1（不透明） BordStyle：边框风格 方法 Refresh：刷新；Move ：移动；方法很少用到。 事件 Cl

4、ick、DblClick：事件很少用到。,功能用于接受用户在框内输入的信息，或显示由程序提供的信息。 （最常用）,文本框（TextBox）,常用属性： Name： Text：文本属性。值为用户从文本框输入的内容。 PasswordChar：口令属性。 MaxLength：最大长度属性。缺省值为0。 MultiLine：多行属性。值为“True”可输入多行文本。 ScrollBars：滚动条属性。,Alignment、 Left、Top、Height、Width、BorderStyle、 Enabled、Font、ForeColor等属性和窗体意义完全相同。,常用方法： Refresh：刷新。

5、SetFocus：设置焦点。 常用事件 Change：文本框的Text属性值发生变化时引发。 LostFocus：当光标离开文本框时引发。 GotFocus：当文本框获得焦点时引发。 KeyPress：当用户按下或松开某个按键时引发。 当用户在文本框内输入字符时，先触发KeyPress事件，然后显示输入的字符，最后触发Change事件。,举例,命令按钮（CommandButton）,属性 Caption： Cancel：取消属性。值为“True”时与按“Esc”键等同 Default：缺省属性。值为“True”与按回车键等同 Style与Picture：风格与图片属性。 Style=0 显示C

6、aption文本（缺省） Style=1 显示Picture图形 ToolTipText：当鼠标停留在控件上时显示的文本。 Enabled：活动属性,方法 SetFocus：设置焦点。 事件 Click,开发应用程序的第一步就是在窗体上安排所需的控件，并设计出各控件相应的属性、方法和事件代码，来完成用户界面的设计。 下面将逐个介绍其他几个常用控件的使用。,7.1 控件的公共属性,7.2.1 鼠标事件,MouseMove 事件 当移动鼠标时引发的事件。 MouseDown、MouseUp 事件 当按下（MouseDown）或者释放（MouseUp）鼠标按钮时发生。,7.2 控件的公共事件,7.2

7、.2 键盘事件,KeyPress事件 当用户按下和松开一个 键时发生。,例7-1,7.3 常用内部控件,属性 List：列表属性。设置列表项包含的内容。 列表项的序号由上至下依次为0、1、2、3。 可以用 对象名.List（序号） 来访问列表项。 ListCount：用于存储列表中所含的全部元素的个数。（计数属性，属性窗口中不显示） ListIndex：列表项索引。其值为最后选中的列表项的序号，第一个为0，如果未选任何表项，则值为-1。 Text：列表项正文。其值为最后选中的列表项的文本。,7.3.1 列表框（ListBox）,用于列出可供用户选择的项目列表。用户单击鼠标，被选中的项目加亮显示

8、。当项目较多时，还会有垂直滚动条。,Text 等价于 List(List1.ListIndex),Columns：列表框显示形式。值为0（缺省）时逐行显示列表项，可能有垂直滚动条；值大于0时，列表项可占多行显示。 Sorted：排序属性。值为“false”（缺省）时，列表项不排序；值为“true”时，列表项按ASC II码排序。 Style：风格属性，缺省值为0；可选择1（加复选框），运行时可选多项。 Selected：选择属性。当某列表项被选中时，该列表项的本属性值为“true”。否则为False。 该属性只能在程序代码中使用 。,列表框（ListBox）,方法 AddItem：在列表框指定

9、位置添加列表项。格式：对象名.AddItem 列表项文本，序号列表项文本为字符串。若不指定位置，则在最后插入。 Clear：删除列表中所有项目。 RemoveItem：删除列表项。格式：对象名. RemoveItem 序号,列表框（ListBox）,AddItem 方法的使用,格式: Object.AddItem ,插入位置序号 例1: 插入至第4行 List1.AddItem “Add a line” , 3 例2: 插入至末尾 List1.AddItem “Add it to the last line” 说明: 插入位置序号必须有效.,RemoveItem方法使用,格式: Object.

10、RemoveItem 删除项序号 例1: 删除第3项 List1.RemoveItem 2 例2: 删除当前选中的项 List1.RemoveItem List1.ListIndex 说明: 删除项序号必须有效,事件 Click （常用） DbClick （较少使用） LostFocus、GotFocus等通用事件,Private Sub Command1_Click() List1.AddItem ghfds End Sub Private Sub Command2_Click() List1.RemoveItem 5 End Sub Private Sub List1_Click() Te

11、xt1.Text = List1.Text Text1.Text = List1.List(List1.ListIndex) End Sub,举例：jl_list,示例,Private Sub Command1_Click() List1.AddItem Text1.Text & & Text2.Text & & Text3.Text & & Val(Text2.Text) + Val(Text3.Text) Command1.Enabled = False Command2.Enabled = True Command2.SetFocus End Sub,Private Sub Form_L

12、oad() List1.AddItem 姓名 理论 上机 总成绩 End Sub,Private Sub Command2_Click() Text1.Text = Text2.Text = Text3.Text = Command2.Enabled = False Command1.Enabled = True Command1.SetFocus Text1.SetFocus End Sub,Private Sub Command3_Click() List1.Clear Text1.Text = Text2.Text = Text3.Text = Text1.SetFocus List1.

13、AddItem 姓名 理论 上机 总成绩 End Sub,属性 Style：组合框外观属性。值为0时：有下拉式列表框的组合框。（缺省值）。值为1时：文本框和列表框的直接组合。用户可以输入文本。值为2时：无文本框，只有下拉列表框。用户不能自己输入文本，只能在列表中选择。 Text：文本属性。其值为在列表框中选中的文本或用户自己输入的文本。,7.3.2 组合框（ComboBox）,功能:将文本框和列表框组合在一起，在列表框中选择的项目会自动填入文本框。也可以向文本框中输入文本。,方法： AddItem、Clear、RemoveItem (使用方法同lisibox) 事件： Click（风格为0或2

14、） DbClick（风格为1） GotFocus LostFocus Change：带有文本框时（风格为0或1），在编辑文本时引发。,组合框（ComboBox）,举例：1.输入文本，自动加入下拉列表框,Private Sub Combo1_Change() Combo1.AddItem Combo1.Text End Sub,用于在多个选项中选择一个。通常由两个或两个以上的单选按钮组成选项按钮组，这些按钮在同一时刻只能选择一个。 属性 Value：确定单选按钮是否被选中。值为“True”则被选中，值为“False”则未被选中。 Caption: 单选按钮上的说明文字。 Alignment: 事

15、件 Click GotFocus LostFocus,7.3.3 选项按钮（OptionButton）,属性 Value：值为“0”表示未选中，值为“1” 表示选中，值为“2”表示不能访问。 Caption: 说明文字。 Alignment:,7.3.4 复选框（CheckBox）,用于在一组选项中同时选择多个选项。,事件：Click GotFocus LostFocus,可利用框架控件或图片框控件作为选项按钮组的“包容器”,用于把其他控件组织在一起。 注意：一定要先放框架，然后在框架内放选项按钮或复选框等。移动框架时，框架内的控件将跟着一起移动。,7.3.5 框架控件（Frame）,框架示例

16、,一个显示图像的控件。它可以显示.BMP、.ICO、.WMF、.GIF、.JPG等格式的文件。 属性 Picture：用来显示一幅图。 Stretch：伸缩属性。在改变控件的大小时，若Stretch值为“False”（缺省）时，图像不随控件大小缩放；值为“True”时，图像随控件大小缩放。 方法 Move Refresh 事件 ：基本与窗体相同。,7.3.6 图像控件（Image）,举例,图片框功能更强，不仅可以显示图形和文本，还提供了更多的功能和绘图方法，解决了图像控件只能装入现存文件的局限。它的属性要比图像控件的属性多得多。另外，其它控件（如选项按钮）可成组放入图片框控件，建立一组选项按钮

17、组。 图像控件和图片框控件的具体应用见第11章。 属性 Picture：用来显示一幅图（fj3）。 方法 Print:在图片框中显示内容。 Cls： PSet：画点。 Line：画线。 Circle：画圆或椭圆。,7.3.7 图片框（PictureBox）,举例,有水平滚动条和垂直滚动条。 属性 Min：滚动块在顶端或左端时所代表的值。（取值范围：-3276732767） Max：滚动块在底端或右端时所代表的值。（取值范围：-3276732767） LargeChange：当用户单击滚动条上的空白位置（左右或上下）时的增减值。 SmallChange：当用户单击两侧的箭头时的增减值。 Valu

18、e：滚动条当前的值。是一整数，缺省值为0。,7.3.8 滚动条（ScrollBar）,事件 Change：滚动条的值发生变化时发生。（移动滚动块结束或单击滚动箭头或单击滚动条后引发） Scroll：只有在移动滚动块时引发，单击滚动箭头或单击滚动条时不引发。,滚动条（ScrollBar）,举例,用于在指定的时间后引发Timer事件,然后有规律的执行该Timer事件过程中的程序代码. 设计时可见，运行时不可见。 属性 Interval（间隔），该属性值决定两次调用Timer事件的时间间隔，单位为毫秒，缺省值为0。 Enabled：活动属性(True/False)。 方法：无 事件：Timer：经过设定的时间间隔后引发，直到停止活动。即Enabled设置为False。,7.3.9 计时器（Timer）,举例 时钟程序,小 结,掌握每个控件的常用属性、方法、事件； 掌握控件方法的同时，要了解参数的含义； 通过编程，加深属性、方法、事件的记忆和理解；,实