VB基础教程第二章第二节(共15节).docVIP

第二节——TextBox控件 在 Visual Basic 操作界面中，TextBox（文本框）控件所代表的图标如图一： 图一 TextBox 控件主要用来显示文本或用来输入文本，如 Windows 登陆时的“口令”窗口，或者记事本的整个编辑区域。 双击工具箱中的文本框控件或者单击文本控件，然后用鼠标在 VB 的工作区域拖拉，就可以创建文本框了。如图二： 图二 文本框控件的默认名称为 TextX（X为 1、2、3，等等），命名规则为 TxtX（X为用户自定义的名字，如 TxtShow、TxtFont、TxtColor ，等等） 一、文本框控件的主要属性：1、Text（文本）属性：本控件最重要的属性，用来显示文本框中的文本内容，可以在界面设置时指定，如图三： 图三 也可以在程序中动态修改，程序代码规则： 文本框控件名.Text = 欲显示的文本内容 如要在一个名为 TxtFont 的文本框控件中显示“隶书”字样，那么输入代码： TxtFont.Text = 隶书 习题一：创建一个文本框（TxtContent）用来显示文本；按钮一（Cmd1），点击时文本框内容变为“跟我来学VB神童教程”；按钮二（Cmd2），点击时文本框内容清空（也就是没有内容）。 答案：见答案区。 2、SelText（选中文本）属性：本属性返回或设置当前所选文本的字符串，如果没有选中的字符，那么返回值为空字符串即。 请注意，本属性的结果是个返回值，或为空，或为选中的文本。 一般来说，选中文本属性跟文件复制、剪切等剪贴板（在 VB 中，剪贴板用 Clipboard 表示）操作有关，如要将文本框选中的文本拷贝到剪贴板上： Clipboard.SetText 文本框名称.SelText（注意，本行没有表示赋值的等号。） 要将剪贴板上的文本粘贴到文本框内： 文本框名称.SelText = Clipboard.GetText（注意，本行有表示赋值的等号。） 例：一个文本框（TxtContent），按钮一（CmdCopy）用于复制文本框中的选中文本；按钮二（CmdPaste）用于将剪贴板上的内容粘贴到文本框内。 按钮一：Private Sub CmdCopy_Click()Clipboard.SetText TxtContent.SelTextEnd Sub 按钮二：Private Sub CmdPaste_Click()TxtContent.SelText = Clipboard.GetTextEnd Sub 3、SelStart 与 SelLength 属性：SelStart ，选中文本的起始位置，返回的是选中文本的第一个字符的位置。SelLength ，选中文本的长度，返回的是选中文本的字符串个数。 例如：文本框 TxtContent 中有内容如下： 跟我一起学习 VB 神童教程 假设选中“一起学习”四个字，那么，SelStart 为 3 ，SelLength 为 4 。 4、MaxLength（最大长度）属性：本属性限制了文本框中可以输入字符个数的最大限度，默认为 0 ，表示在文本框所能容纳的字符数之内没有限制，文本框所能容纳的字符个数是 64K ，如果超过这个范围，则应该用其他控件来代替文本框控件。 这跟 Windows 中用记事本打开文件一样，当文件过大，系统会自动调用写字板来打开文件，而不是用记事本。 文本框控件 MaxLength 属性既可以在界面设置过程中予以指定，如图四： 图四 也可以在设计时予以改变，代码如下：文本框控件名.Maxlength = X（X为阿拉伯数字，如 10、20、57，等等）。 5、MultiLine（多行）属性：本属性决定了文本框是否可以显示或输入多行文本，当值为 True ，文本框可以容纳多行文本；当值为 False ，文本框则只能容纳单行文本。 本属性只能在界面设置时指定，程序运行时不能加以改变。如图五： 图五 6、PasswordChar（密码）属性：本属性主要用来作为口令功能进行使用。例如，若希望在密码框中显示星号，则可在“属性”窗口中将 PasswordChar 属性指定为 “*” 。这时，无论用户输入什么字符，文本框中都显示星号。如图六： 图六 在 VB 中，PasswordChar 属性的默认符号是星号，但你也可以指定为其他符号。但请注意，如果文本框控件的 MultiLine（多行）属性为 True ，那么文本框控件的 PasswordChar 属性将不起作用。 习题二：一个文本框（TxtPassword），PasswordChar 属性指定为星号“*”；一个按钮（CmdShow）；另外还有一个标签（LblShow），在初始状态下，Caption 为空。程序目的在于，点击