《vb第4章窗体与常用内部控件1幻灯片》由会员分享，可在线阅读，更多相关《vb第4章窗体与常用内部控件1幻灯片（24页珍藏版）》请在金锄头文库上搜索。
1、1,第4章,窗体与常用内部控件,本章要点: 窗体 命令按钮、文本框、标签 框架、图片框、图像框 选项按钮、复选框 列表框、组合框 计时器、滚动条,2,4.1 窗体,窗体: 窗口(一般，设计期称窗体、运行期称窗口) 窗体模块: 每个窗体对应于一个窗体模块 1. 窗体的结构,3,移除方法一: 工程移除Form1 移除方法二: 在工程资源管理器中右击窗体名称移除Form1,工程添加窗体(打开“添加窗体”对话框) ,新建,现存,添加方法二: 使用工具栏中的“添加窗体”按钮,设置启动对象:工程工程1属性设置启动对象,添加方法一:,2. 添加窗体、移除窗体,4,3. 属性 (1) Name(名称): 窗体
2、的名称，且是磁盘上的窗体文件名，扩展名为.frm。 (2) BackColor: 窗体的背景颜色。 (3) BorderStyle: 窗体的边框样式 。 (4) Caption(标题) : 窗体标题栏显示的内容。 (5) ControlBox: 决定窗体是否具有控制菜单 (6) Font: 窗体中输出字符的字体、大小等特性。 (7) ForeColor: 窗体的前景颜色。 (8) Icon: 运行时窗体处于最小化时所显示的图标。 (9) MaxButton: 决定窗体的标题栏中是否具有最大化按钮。 (10) Moveable: 决定窗体是否能移动 (11) Picture: 设置要在窗体上显示
3、的图片。 (12) WindowState: 决定运行时窗体是正常、最小化还是最大化。,5,运行时只读属性(只能在属性窗口中设置): Name; BorderStyle; ControlBox; MaxButton; Moveable 4. 事件 常用事件有: Load、 Activate 、 Click、DblClick 例: 单击窗体时产生Click事件,将窗体背景设成黄色 Private Sub Form_Click() Form1.BackColor = vbYellow End Sub 5. 方法 窗体上常用的方法有Print、Cls、Move和Show等,6,4.2.1 控件的分类
4、,内部控件默认状态下工具箱中显示的控件 CommandButton Label PictureBox ActiveX控件存于.OCX文件中，包括各种版本的VB控件，必要时可添加到工具箱中。 ToolBar CommonDialog ImageList 可插入对象将其他应用程序产品作为一个对象加入到工具箱中。如Excel工作表、公式等。,4.2 控件简介,7,4.2.2 控件的公共属性,1. Name属性 (1) 运行时是只读的 (2) 缺省名称 控件类型标志符整数 (3) 以字母开始，最长40个字符，可包括字母、数字和下划线，不能包括标点符号或空格(允许汉字) (4) 控件数组的名称: Nam
5、e(Index) 2. Caption属性 (1) 窗体 显示在标题栏中的文本 控件 显示在控件中或控件后的文本 (2) 加访问键: 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 Sub 3
6、. 方法 SetFocus方法: 将焦点定位在指定的命令按钮上 例: cmdOk.SetFocus,15,焦点和Tab键序问题 焦点 当前可以接收用户输入的对象称为具有焦点。 注意: 并非所有控件都可以接收焦点。而且, 只有Enabled和Visible属性为True时，才可以接收焦点。 事件 GotFocus 发生在对象得到焦点时 LostFocus 发生在对象失去焦点时 对象何时得到焦点 运行时选择对象(鼠标、Tab键、访问键) 在代码中使用SetFocus方法,16,Tab键序 指按Tab键时光标在各个控件之间移动的顺序。 每个窗体都有自己的Tab键序。 默认键序与控件的建立次序一致。
7、TabIndex属性: 决定键序 改变TabIndex属性可以改变键序 TabStop属性: 决定是否能够使用 Tab 键将焦点移动到当前对象。,17,4.4 文本框(TextBox) 1. 属性 (1) Text: 返回或设置文本框显示的内容。 例: Text1.Text = 欢迎使用Visual Basic (2) MultiLine: 决定是否可以显示多行文本。 (3) PasswordChar: 常用于输入口令。 在文本框中键入字符显示为该指定的字符。 (此时MultiLine属性值应为False) (4) ScrollBars: 用于确定文本框是否带滚动条以及滚动条的方向。 (仅当M
8、ultiLine属性值为True时才可以带滚动条),18,(5) SelLength: 在运行期返回或设置选择的字符数。 例: Text1.SelLength=Len(Text1.Text) 表示选中文本框Text1中所有字符。 (6) SelStart: 在运行期返回或设置当前选择文本的起始位置。 例: Text1.SelStart=0 表示选择文本的起始位置从第一个字符开始。 (7) Locked: 指定运行时文本框内容是否可以编辑。 False可以编辑 True不可编辑(只读),19,2. 事件和方法 事件: Change 、Click、DblClick、 GotFocus、LostFo
9、cus、KeyPress等 方法: SetFocus 【例题 】在窗体上建立一个文本框，将输入到文本框中的小写字母转换为大写。 Private Sub Text1_KeyPress (KeyAscii As Integer) Char = Chr(KeyAscii) KeyAscii = Asc(UCase(Char) End Sub,20,4.5 标签(Label) 1. 属性 (1) Caption: 标签的标题 (2) Alignment: 确定标签标题的对齐方式 (3) AutoSize: 确定标签是否随标题自动调整大小 (4) BorderStyle: 确定标签的边框 0 无边框；1
10、 有边框 (5) BackStyle: 指定背景是透明或不透明 1不透明；0透明,21,2. 标签的事件: Click、DblClick. 例: Private Sub Label1_DblClick() Label1.FontSize = Label1.FontSize + 10 End Sub 3. 标签的方法:Move 格式: .Move , : 指示对象左边的水平坐标(x-轴)。 : 指示对象顶边的垂直坐标(y-轴)。 : 指示对象新的宽度。 : 指示对象新的高度。 例: Private Sub Label1_Click() Label1.Move Label1.Left + 50 E
11、nd Sub,22,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.Ca
12、ption= 计算机等级考试 End Sub D） Private Sub Command1_Click() Text1.Text= 计算机等级考试 End Sub,23,2004年4月二级VB试题,以下关于焦点的叙说中，错误的是（ ） A) 如果文本框的TabStop属性为False，则不能接收从键盘上输入的数据 B) 当文本框失去焦点时，触发LostFocus事件 C) 当文本框的Enabled属性为False时，其Tab顺序不起作用 D) 可以用TabIndex属性改变Tab顺序,24,2005年4月二级VB试题,为了使命令按钮Command1右移200，应使用的 语句是（ ） A）Command1.Move -200 B）Command1.Move 200 C）Command1.Left = Command1.Left + 200 D）Command1.Left = Command1.Left - 200,
