VB语言教程——ch06.pptVIP

第6章 基本控件的使用 本章要点： 标签和按钮控件 单选按钮和复选框控件 图片框和图像框控件 计时器控件 列表框控件 组合框和滚动条控件 6.1 标 签 控 件 实例 标签的使用 在该程序中，窗体上显示一行提示用户执行操作的文本，当用户单击或双击窗体时，窗体上还会显示出用户所执行的操作。 在窗体上放置两个标签控件。 6.1 标 签 控 件 添加代码： Private Sub Form_Click() Lab1.BorderStyle = 0 Lab1.Caption = 您单击了窗体！ End Sub Private Sub Form_DblClick() Lab1.BorderStyle = 1 Lab1.Caption = 您双击了窗体！ End Sub 6.2 按 钮 控 件 6.2.1 按钮的有效性 本实例用来模拟录音机的停止与播放按钮。在窗体中放置一个标签控件和两个按钮控件。 6.2 按 钮 控 件 为“停止”按钮添加下列代码： Private Sub ComStop_Click() Label1.Caption = 歌曲播放停止 ComStop.Enabled = False ComPlay.Enabled = True End Sub 6.2 按 钮 控 件 6.2.2 多功能按钮 在该程序中，窗体上只有一个按钮，单击该按钮，按钮的标题会在“显示日期”与“显示时间”间切换，并且在窗体中显示相应的内容。 在窗体上放置一个标签控件和一个按钮控件。 6.2 按 钮 控 件 6.2.2 多功能按钮 将下列代码添加到Command1_Click事件过程中： Private Sub Command1_Click() If Command1.Caption = 显示日期 Then Label1.Caption = Date Command1.Caption = 显示时间 Else Label1.Caption = Time Command1.Caption = 显示日期 End If End Sub 6.2 按 钮 控 件 6.2.3 图片按钮 在该程序中，按钮上显示有图片，形象地说明了该按钮的功能。并且，按钮上的图片还会根据用户的操作，做出相应的变化。 在窗体上放置一个标签控件和两个按钮控件。 6.2 按 钮 控 件 6.2.3 图片按钮 为“关灯”按钮添加以下代码： Private Sub ComLight_Click() If ComLight.Caption = 关 灯 Then ComLight.Picture = LoadPicture(Lighton.ico ) ComFace.Picture = LoadPicture(Face04.ico ) ComLight.Caption = 开 灯 Else ComLight.Picture = LoadPicture(Lightoff.ico ) ComFace.Picture = LoadPicture(Face02.ico) ComLight.Caption = 关 灯 End If End Sub 6.2 按 钮 控 件 6.2.3 图片按钮 为笑脸按钮添加以下代码： Private Sub ComFace_Click() If ComLight.Caption = 关 灯 Then Label1.Caption = 我 高 兴！ Else Label1.Caption = 我 生 气！ End If End Sub 6.3 文本框控件 6.3.1 文本框的基本属性 6.3 文本框控件 6.3.2 字体与字号 6.3 文本框控件 6.3.3 选择文本 6.3 文本框控件 6.3.4 密码框 通过设置文本框的PasswordChar属性，就可以将普通的文本框设置成为密码框。 如果将PasswordChar属性的值设置为某个字符，如设置为星号（*），则用户在文本框中输入任何字符都将显示为“*”。例如，输入的是“1234”，显示的则是“****”。 6.3 文本框控件 6.3.5 Change事件 在该程序中，用户在文本框中输入内容时，窗体上就会同步显示出所输入的内容。并且修改了文本