二级VB程序设计教程

《二级VB程序设计教程》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、VB程序设计教程主讲老师：韩维良2005.3第六章常用标准控件第一节文本控件一、标签（Label）用于显示一段文本信息。一般用于标识没有Caption属性的控件，给它们加上一个标题，或显示一段正文(如安装信息)或其它一些不想让用户修改的信息，它的长度最长可设为1024字节。在工具箱中的标签控件是按钮。1、主要属性①、名称属性(Name)：前缀Lbl。②、标题属性(Caption)：设置显示在标签上的文本。③、对齐属性(Alignment)：用来设置标签上文本的对齐方式，有左对齐、右对齐和中对齐三种；系统默认使用左对齐方式：0——代表左对齐1——代表右对齐2——代

2、表中对齐。④、自动缩放属性(Autosize)：用于设置标签的大小是否随显示文本的多少自动进行调整；如果被设置为True，则自动进行调整；系统默认设置为False。⑤、边框属性(BorderStyle)：设置标签的边框类型：0代表标签无边框，1代表有一条线的边框；配合Appearance（外观属性：平面、立体）的设置可以具有三维效果（如同一个文本框）。⑥、文本卷绕属性(WordWrap)（自动换行属性）：用来决定AutoSize属性为True的Label控件超过宽度的文本的扩展方式；True——垂直扩展False——水平扩展设置此属性的语句是：LblText.W

3、ordWrap=True或False。2、常用的事件一般情况下，从标签扮演的角色来谈，不需要通过某种操作产生什么事件，不写事件代码；当然严格地讲，也可以有它的事件：鼠标单击事件(Click)鼠标双击(DblClick)鼠标移动事件(MouseMove)。二、文本框用于显示和输入文本。1、常用属性：①、名称属性（Name）:名称前缀为TXT；②、文本属性(Text)：是显示在文本框中的文本内容。③、长度限制属性(MaxLength)：用来设置用户在文本框中输入的字符串的最大长度；系统默认此设置为0，表示文本输入的最大长度在文本框所能容纳的字符数之内没有限制；在数据

4、库程序中一般应设置为一个具体设置，如用户登陆输入框中的用户名总不能无限长。文本框所能容纳的字符数是32K.④、多行属性(MultiLine)：用来设置文本框是否能显示或输入多行文本。⑤、密码字符属性(PassWordChar)：用指定的字符代替输入到文本框中的文本，起到屏蔽输入回显的功能；一般用户输入的密码是不能显示的。⑥、滚动条属性(ScrollBar)：MultiLine为True的前提下，用来设置是否需要附带滚动条；0——不添加滚动条（默认）1——添加水平滚动条2——添加垂直滚动条3——同时添加水平和垂直滚动条当MultiLine设为True时，才能设置滚

5、动条属性。当MultiLine设为False时，不论ScrollBar为何值，都不会出现滚动条。⑦、选择属性（SelText）：用于返回或设置包含当前所选中文本的字符串；（选中的目的）使用剪贴板的SetText方法将文本框中选中的文本复制到剪贴板：Clipboard.SetTextText1.SelText通过重新设置文本框的SelText属性实现粘贴操作：Text1.SelText =Clipboard.GetText⑧、SelStart：返回被选文本第一个字符的位置，也可用于设置欲选文本第一个字符的位置。SelStart属性是一个数字，指示文本串内的插入点，

6、其中0表示最左边的位置，往后依次为1，2，3……。如为0，则从第一个字符开始被选中。⑨、SelLength：用于设置从SelStart开始的欲选文本的长度，或者返回被选文本的长度。⑩、只读属性（Locked）用于阻止用户改变文本框的内容，用户只可以看文本而不能改变它。为True，则不能修改。默认为False。2、主要事件支持鼠标单击、双击、按下、弹起等事件，除此以外，还有下列常用事件。①、文本改变事件(Change)是默认事件；当文本框中的文本被改变时，就会产生这个事件。②、获得焦点事件（GetFocus）当用户用Tab健或鼠标单击文本框使其获得焦点后，将会发生

7、这个事件。③、失去焦点事件(LostFocus)当用户用Tab健或鼠标单击选择了其它的控件后，文本框将会失去焦点，发生这个事件④、键盘事件主要有：keydown——按下事件、keyup——弹起事件和kepress——按键事件。事件过程的形式为：PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAs Integer)<语句>End Sub例如，如果希望将文本框中的所有字符都强制转换为大写字符，则可在输入时使用此事件转换大小写：PrivateSubText1_KeyPress (KeyAsciiAs Integer)KeyAs

8、cii=Asc(Ucas