VB教程---命令钮标签文本框.ppt

Visual Basic程序设计 命令按钮、标签和文本框 CommandButton 命令按钮控件,单击按钮执行某项操作。 Label 标签控件,用来显示文本 TextBox 文本框控件,用来输入和显示文本 常用属性： Caption 属性 该属性设定按钮显示的文字。 Style属性 控制按钮的显示类型 共有两种取值：标准类型standard和图形类型graphical。 设为graphical时下面三个属性不起作用 Picture属性 指定按钮中显示的图片。 BackColor属性 指定按钮的背景颜色。 命令按钮CommandButton 命令按钮的快捷访问键 访问键 为按钮的选中提供了一种快捷方式，即同时按下ALT键和访问键等同于鼠标单击该按钮。 设置访问键 在caption属性中，在想要指定为访问键的字符前加一个“”符号，该字符就会带有一个下划线。比如：Next，Last 程序演示 命令按钮的事件 【例1】点击一个按钮，发出铃声 一个命令按钮控件：Command1 编写Click事件过程(双击按钮即可进入代码窗口) Private Sub Command1_Click() Beep End Sub 【例2】在窗体上添加一个按钮，实现窗口的最大化和还原。设计一个命令按钮， 命名为cmdSize （窗体的MaxButton和MinButton属性均设置为False） ： 在窗口第一次显示时，按钮标题为“最大化(L)” 。 点击按钮后将窗口最大化，并且标题变成“还原(B)”。 再点击设置窗口还原，标题又恢复为“最大化(L)” 。 Private Sub cmdSize_Click() If cmdSize.Caption = 最大化(L) Then Me.WindowState = 2 cmdSize.Caption = 还原(B) Else Me.WindowState = 0 cmdSize.Caption = 最大化(L) End If End Sub 待讲 【例3】一个使用按钮红绿灯变化的小程序 三个image控件，分别放红黄绿灯亮的图案 两个CommandButton控件，一个负责改变image控件的visible属性，另一个关闭窗口 Private Sub Command1_Click() If Shape1.Visible = True Then Shape1.Visible = False Shape2.Visible = True ElseIf Shape2.Visible = True Then Shape2.Visible = False Shape3.Visible = True Else Shape3.Visible = False Shape1.Visible = True End If End Sub Private Sub Form_Load() Shape2.Visible = False Shape3.Visible = False End Sub 程序演示 待讲 选定命令按钮 程序执行有以下方法选中命令按钮： ①鼠标单击按钮 ②用Tab键把焦点移到按钮上，按空格或回车键 ③使用按钮的快捷键（Alt+有下划线的字母） ④设置按钮的Default属性为True, 直接使用Enter键即可选中 设置按钮的Cancel属性为True, 用Esc键选中 标签Label 标签的用途: 1、通常用来标注本身不具有Caption属性的控件 2、提供其他控件的访问键 绘制控件，并保证每个标签Tabindex值比其后的小一。 每个标签的Caption属性用字符“”指定访问。如：“编号(I)”。 程序演示 标签 常用属性： Autosize 为True，可自动水平适应长度 WordWrap 为True，可自动换行显示，前提是Autosize为True　 BackStyle 背景是否透明 BorderStyle 边框样式 文本框用来编辑和显示文本。 （一） 属性 1．基本属性 Name、Height、Width、Top、Left、Enabled、Visible、Font，ForeColor、BackColor等与标签控件相同。? 2．常用属性 （1）Text文本属性 在文本框中显示的正文内容存放在Text属性中。当程序运行时，用户通过键盘输入正文内容，保存在Text属性中。 缺省情况下，文本框中的文本最多为2048个。 文本框没有Caption属性 文本框 TextBox 常用