vb第4章窗体与常用内部控件1.ppt

V i s u a l B A S I C 程程序序设设计计第第4 4章章窗体与常用内部控件窗体与常用内部控件本章要点本章要点:窗体窗体 命令按钮、文本框、标签命令按钮、文本框、标签 框架、图片框、图像框框架、图片框、图像框 选项按钮、复选框选项按钮、复选框 列表框、组合框列表框、组合框 计时器、滚动条计时器、滚动条1.第第四四章章 窗窗体体与与常常用用内内部部控控件件4.1 4.1 窗体窗体 窗体窗体:窗口窗口(一般，设计期称窗体、运行期称窗口一般，设计期称窗体、运行期称窗口)窗体模块窗体模块:每个窗体对应于一个窗体模块每个窗体对应于一个窗体模块1.窗体的结构窗体的结构控制菜单控制菜单 标题栏标题栏最最 大大 化化/还还原原最小化最小化关闭关闭边框边框2.第第四四章章 窗窗体体与与常常用用内内部部控控件件移除方法一移除方法一:工程工程移除移除Form1移除方法二移除方法二:在工程资源管理器中右击窗体名称在工程资源管理器中右击窗体名称移除移除Form1工程工程添加窗体添加窗体(打开打开“添加窗体添加窗体”对话框对话框)新建新建现存现存添加方法二添加方法二:使用工具栏中的使用工具栏中的“添加窗体添加窗体”按钮按钮设置启动对象设置启动对象:工程工程工程工程1属性属性设置启动对象设置启动对象显示具体窗体名显示具体窗体名添加方法一添加方法一:2.添加窗体、移除窗体添加窗体、移除窗体3.第第四四章章 窗窗体体与与常常用用内内部部控控件件3.属性属性(1)Name(名称名称):窗体的名称，且是磁盘上的窗体文件窗体的名称，且是磁盘上的窗体文件名，扩展名为名，扩展名为.frm。(2)BackColor:窗体的背景颜色。窗体的背景颜色。(3)BorderStyle:窗体的边框样式窗体的边框样式。(4)Caption(标题标题):窗体标题栏显示的内容。窗体标题栏显示的内容。(5)ControlBox:决定窗体是否具有控制菜单决定窗体是否具有控制菜单(6)Font:窗体中输出字符的字体、大小等特性。窗体中输出字符的字体、大小等特性。(7)ForeColor:窗体的前景颜色。窗体的前景颜色。(8)Icon:运行时窗体处于最小化时所显示的图标。运行时窗体处于最小化时所显示的图标。(9)MaxButton:决定窗体的标题栏中是否具有最大化决定窗体的标题栏中是否具有最大化按钮。按钮。(10)Moveable:决定窗体是否能移动决定窗体是否能移动(11)Picture:设置要在窗体上显示的图片。设置要在窗体上显示的图片。(12)WindowState:决定运行时窗体是正常、最小化决定运行时窗体是正常、最小化还是最大化。还是最大化。4.第第四四章章 窗窗体体与与常常用用内内部部控控件件 运行时只读属性运行时只读属性(只能在属性窗口中设置只能在属性窗口中设置):Name;BorderStyle;ControlBox;MaxButton;Moveable4.事件事件 常用事件有常用事件有:Load、Activate、Click、DblClick 例例:单击窗体时产生单击窗体时产生Click事件事件,将窗体背景设成黄色将窗体背景设成黄色 Private Sub Form_Click()Form1.BackColor=vbYellow End Sub5.方法方法 窗体上常用的方法有窗体上常用的方法有Print、Cls、Move和和Show等等5.第第四四章章 窗窗体体与与常常用用内内部部控控件件4.2.14.2.1 控件的分类控件的分类 内部控件内部控件默认状态下工具箱中显示的控件默认状态下工具箱中显示的控件 CommandButton Label PictureBox ActiveX控件控件存于存于.OCX文件中，包括各种版文件中，包括各种版本的本的VB控件，必要时可添加到控件，必要时可添加到工具箱中。工具箱中。ToolBar CommonDialog ImageList 可插入对象可插入对象将其他应用程序产品作为一个将其他应用程序产品作为一个对象加入到工具箱中。如对象加入到工具箱中。如Excel工作表、公式等。工作表、公式等。4.2 控件简介控件简介6.第第四四章章 窗窗体体与与常常用用内内部部控控件件4.2.2 4.2.2 控件的公共属性控件的公共属性1.Name属性属性(1)运行时是只读的运行时是只读的(2)缺省名称缺省名称 控件类型标志符整数控件类型标志符整数(3)以字母开始，最长以字母开始，最长40个字符，可包括字母、数字个字符，可包括字母、数字和下划线，不能包括标点符号或空格和下划线，不能包括标点符号或空格(允许汉字允许汉字)(4)控件数组的名称控件数组的名称:Name(Index)2.Caption属性属性(1)窗体窗体 显示在标题栏中的文本显示在标题栏中的文本 控件控件 显示在控件中或控件后的文本显示在控件中或控件后的文本(2)加访问键加访问键:&字母字母(3)Label控件标题大小没有限制。其他有标题的控控件标题大小没有限制。其他有标题的控件，标题大小限制为件，标题大小限制为255个字符。个字符。7.第第四四章章 窗窗体体与与常常用用内内部部控控件件3.Enabled属性属性 决定控件是否能够对用户产生的事件作出响应决定控件是否能够对用户产生的事件作出响应 4.Visible属性属性 注意注意:如果在属性窗口中将控件的如果在属性窗口中将控件的Visible属性设置属性设置为为False，则控件在设计窗体上仍是可见的，仅在运则控件在设计窗体上仍是可见的，仅在运行时才不可见。行时才不可见。【例题】【例题】Visible属性和属性和Enabled属性的比较属性的比较8.第第四四章章 窗窗体体与与常常用用内内部部控控件件“显示图像显示图像”按钮按钮Command1的的Click事件过程如下事件过程如下:Private Sub Command1_Click()Image1.Visible=True Command1.Enabled=False Command2.Enabled=True End Sub“隐藏图像隐藏图像”按钮按钮Command2的的Click事件过程如下事件过程如下:Private Sub Command2_Click()Image1.Visible=False Command1.Enabled=True Command2.Enabled=FalseEnd Sub9.第第四四章章 窗窗体体与与常常用用内内部部控控件件5.Left、Top、Height、Width属性属性 返回或设置控件的位置和尺寸返回或设置控件的位置和尺寸 对于窗体，这些属性总是以缇为单位表示；对于对于窗体，这些属性总是以缇为单位表示；对于控件，它们的度量单位取决于其容器的坐标系统控件，它们的度量单位取决于其容器的坐标系统6.BackColor、ForeColor属性属性(1)在在Label和和Shape控件中，如果控件中，如果BackStyle属性的属性的设置值为设置值为0(透明透明)，则忽略，则忽略BackColor属性。属性。(2)如果在如果在Form对象或对象或PictureBox控件中设置控件中设置BackColor属性，则所有已经打印的文本或用属性，则所有已经打印的文本或用绘绘图方法图方法绘制的图形都将被擦除掉。绘制的图形都将被擦除掉。(3)设置设置ForeColor属性值不会影响已经打印的文本属性值不会影响已经打印的文本或绘制的图形。或绘制的图形。10.第第四四章章 窗窗体体与与常常用用内内部部控控件件7.FontName、FontSize、FontBold、FontItalic、FontStrikethru、FontUnderline属性属性8.Font对象属性对象属性格式格式:.Font.:Name、Size、Bold、Italic、Underline、Strikethrough例例:Form1.Font.Size=14 Command1.Font.Italic=True11.第第四四章章 窗窗体体与与常常用用内内部部控控件件4.3 4.3 命令按钮命令按钮(CommandButton)1.属性属性(1)Name(名称名称):按钮对象名按钮对象名。必须以一个英文字母开始，且最多必须以一个英文字母开始，且最多40个字符。不能个字符。不能包含标点符号或空格。包含标点符号或空格。(2)Caption:命令按钮的标题。命令按钮的标题。在字符前加一个在字符前加一个“&”符号符号，该字符就会带有一个，该字符就会带有一个下划线，成为访问键。运行时，同时按下下划线，成为访问键。运行时，同时按下Alt键和带键和带下划线的字符。下划线的字符。(3)Font:设置文字的字体、字形、大小和效果等。设置文字的字体、字形、大小和效果等。(4)Default:指定该命令按钮是否为窗体的缺省按钮。指定该命令按钮是否为窗体的缺省按钮。(5)Cancel:指定该命令按钮是否为窗体的取消按钮。指定该命令按钮是否为窗体的取消按钮。(6)Style:0-Standard(缺省值缺省值)不能显示图形或设置颜色不能显示图形或设置颜色 1-Graphical 可以显示图形或设置颜色可以显示图形或设置颜色12.第第四四章章 窗窗体体与与常常用用内内部部控控件件(7)Picture:指定要在命令按钮上显示的图形。指定要在命令按钮上显示的图形。(8)DownPicture:指定命令按钮按下时显示的图形。指定命令按钮按下时显示的图形。(9)DisabledPicture:指定命令按钮无效时显示的图形。指定命令按钮无效时显示的图形。(10)Enabled:该属性值为该属性值为False时，表示命令时，表示命令 按钮无效，不能对用户产生的事件作出反应，按钮无效，不能对用户产生的事件作出反应，呈暗淡显示。缺省值为呈暗淡显示。缺省值为True。(11)Visible:决定命令按钮在运行时是否可见。决定命令按钮在运行时是否可见。(12)Value:该属性只能在程序运行期间使用。该属性只能在程序运行期间使用。设置为设置为True表示该命令按钮被按下。表示该命令按钮被按下。13.第第四四章章 窗窗体体与与常常用用内内部部控控件件2.事件事件Click;KeyDown;KeyUp;MouseDown;MouseUp例例:Private Sub Command1_MouseDown()Form1.BackColor=vbRed End Sub例例:Private Sub Command1_MouseUp()Form1.BackColor=vbGreen End Sub例例:Private Sub Command1_KeyDown()Form1.Caption=你好你好 End Sub3.方法方法 SetFocus方法方法:将焦点定位在指定的命令按钮上将焦点定位在指定的命令按钮上例例:cmdOk.SetFocus14.第第四四章章 窗窗体体与与常常用用内内部部控控件件焦点和焦点和TabTab键序问题键序问题焦点焦点 当前可以接收用户输入的对象称为具有焦点。当前可以接收用户输入的对象称为具有焦点。注意注意:并非所有控件都可以接收焦点。而且并非所有控件都可以接收焦点。而且,只有只有Enabled和和Visible属性为属性为True时，才可以接时，才可以接收焦点。收焦点。事件事件 GotFocus 发生在对象得到焦点时发生在对象得到焦点时 LostFocus 发生在对象失去焦点时发生在对象失去焦点时对象何时得到焦点对象何时得到焦点 运行时选择对象运行时选择对象(鼠标、鼠标、Tab键、访问键键、访问键)在代码中使用在代码中使用SetFocus方法方法15.第第四四章章 窗窗体体与与常常用用内内部部控控件件Tab键序键序 指按指按Tab键时光标在各个控件之间移动的顺序。键时光标在各个控件之间移动的顺序。每个窗体都有自己的每个窗体都有自己的Tab键序。键序。默认键序与控件的建立次序一致。默认键序与控件的建立次序一致。TabIndex属性属性:决定键序决定键序 改变改变TabIndex属性可以改变键序属性可以改变键序 TabStop属性属性:决定是否能够使用决定是否能够使用 Tab 键将焦点键将焦点移动到当前对象。移动到当前对象。16.第第四四章章 窗窗体体与与常常用用内内部部控控件件4.4 4.4 文本框文本框(TextBox)1.属性属性(1)Text:返回或设置文本框显示的内容。返回或设置文本框显示的内容。例例:Text1.Text=欢迎使用欢迎使用Visual Basic(2)MultiLine:决定是否可以显示多行文本决定是否可以显示多行文本。(3)PasswordChar:常用于输入口令。常用于输入口令。在文本框中键入字符显示为该指定的字符。在文本框中键入字符显示为该指定的字符。(此时此时MultiLine属性值应为属性值应为False)(4)ScrollBars:用于确定文本框是否带滚动条以及滚用于确定文本框是否带滚动条以及滚动条的方向动条的方向。(仅当仅当MultiLine属性值为属性值为True时才可以带滚动条时才可以带滚动条)17.第第四四章章 窗窗体体与与常常用用内内部部控控件件(5)SelLength:在运行期返回或设置选择的字符数。在运行期返回或设置选择的字符数。例例:Text1.SelLength=Len(Text1.Text)表示选中文本框表示选中文本框Text1中所有字符。中所有字符。(6)SelStart:在运行期返回或设置当前选择文本的起在运行期返回或设置当前选择文本的起始位置。始位置。例例:Text1.SelStart=0 表示选择文本的起始位置从第一个字符开始。表示选择文本的起始位置从第一个字符开始。(7)Locked:指定运行时文本框内容是否可以编辑。指定运行时文本框内容是否可以编辑。False可以编辑可以编辑 True不可编辑不可编辑(只读只读)18.第第四四章章 窗窗体体与与常常用用内内部部控控件件2.事件和方法事件和方法 事件事件:Change、Click、DblClick、GotFocus、LostFocus、KeyPress等等 方法方法:SetFocus【例题【例题】在窗体上建立一个文本框，将输入到文本】在窗体上建立一个文本框，将输入到文本框中的小写字母转换为大写。框中的小写字母转换为大写。Private Sub Text1_KeyPress(KeyAscii As Integer)Char=Chr(KeyAscii)KeyAscii=Asc(UCase(Char)End Sub19.第第四四章章 窗窗体体与与常常用用内内部部控控件件4.5 4.5 标签标签(Label)Label)1.属性属性(1)Caption:标签的标题标签的标题(2)Alignment:确定标签标题的对齐方式确定标签标题的对齐方式(3)AutoSize:确定标签是否随标题自动调整大小确定标签是否随标题自动调整大小(4)BorderStyle:确定标签的边框确定标签的边框 0 无边框；无边框；1 有边框有边框(5)BackStyle:指定背景是透明或不透明指定背景是透明或不透明 1不透明；不透明；0透明透明20.第第四四章章 窗窗体体与与常常用用内内部部控控件件2.标签的事件标签的事件:Click、DblClick.例例:Private Sub Label1_DblClick()Label1.FontSize=Label1.FontSize+10 End Sub3.标签的方法标签的方法:Move 格式格式:.Move ,:指示对象左边的水平坐标指示对象左边的水平坐标(x-轴轴)。:指示对象顶边的垂直坐标指示对象顶边的垂直坐标(y-轴轴)。:指示对象新的宽度。指示对象新的宽度。:指示对象新的高度。指示对象新的高度。例例:Private Sub Label1_Click()Label1.Move Label1.Left+50 End Sub21.第第四四章章 窗窗体体与与常常用用内内部部控控件件2005年年4月二级月二级VB试题试题 在窗体在窗体(Form1)上画一个名称为上画一个名称为Command1的命令按钮和一个的命令按钮和一个名称为名称为Text1的文本框，然后编写一个事件过程。程序运行后，的文本框，然后编写一个事件过程。程序运行后，如果在文本框中输入一个字符，则命令按钮的标题设置为如果在文本框中输入一个字符，则命令按钮的标题设置为“计计算机等级考试算机等级考试”。以下能够实现上述操作的事件过程是：。以下能够实现上述操作的事件过程是：A）Private Sub Text1_Change()Command1.Caption=计算机等级考试计算机等级考试 End Sub B）Private Sub Command1_Click()Caption=计算机等级考试计算机等级考试 End Sub C）Private Sub Form1_Click()Text1.Caption=计算机等级考试计算机等级考试 End Sub D）Private Sub Command1_Click()Text1.Text=计算机等级考试计算机等级考试 End Sub22.第第四四章章 窗窗体体与与常常用用内内部部控控件件2004年年4月二级月二级VB试题试题 以下关于焦点的叙说中，错误的是（以下关于焦点的叙说中，错误的是（）A)如果文本框的如果文本框的TabStop属性为属性为False，则不能接收，则不能接收从键盘上输入的数据从键盘上输入的数据B)当文本框失去焦点时，触发当文本框失去焦点时，触发LostFocus事件事件C)当文本框的当文本框的Enabled属性为属性为False时，其时，其Tab顺序不顺序不起作用起作用D)可以用可以用TabIndex属性改变属性改变Tab顺序顺序 23.第第四四章章 窗窗体体与与常常用用内内部部控控件件2005年年4月二级月二级VB试题试题 为了使命令按钮为了使命令按钮Command1右移右移200，应使用的，应使用的语句是（语句是（）A）Command1.Move-200B）Command1.Move 200C）Command1.Left=Command1.Left+200D）Command1.Left=Command1.Left-200 24.