VB 神童教程第二章第二节--TextBox控件

2024-07-16 17:58:49

字体：大中小

来源：转载

供稿：网友

在 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.SelText

End Sub

按钮二：

Private Sub CmdPaste_Click()

TxtContent.SelText = Clipboard.GetText

End Sub

3、SelStart 与 SelLength 属性：

SelStart ，选中文本的起始位置，返回的是选中文本的第一个字符的位置。SelLength ，选中文本的长度，返回的是选中文本的字符串个数。例如：文本框 TxtContent 中有内容如下：

上一篇：VB 神童教程第二章第一节--Label 控件

下一篇：Spcomm串口控件的例程