编程高手之路跟我学VB—第二节——TextBox控件
Visual Basic 操作界面中,TextBox(文本框)控件所代表的图标如图一:

图一
TextBox 控件主要用来显示文本或用来输入文本,如 Windows 登陆时的口令窗口,或者记事本的整个编辑区域。
双击工具箱中的文本框控件或者单击文本控件,然后用鼠标在 VB 的工作区域拖拉,就可以创建文本框了。如图二:

图二
文本框控件的默认名称为 TextXX 123,等等),命名规则为 TxtXX为用户自定义的名字,如 TxtShowTxtFontTxtColor ,等等)
一、文本框控件的主要属性:
1Text(文本)属性:
本控件最重要的属性,用来显示文本框中的文本内容,可以在界面设置时指定,如图三:

图三
也可以在程序中动态修改,程序代码规则:
文本框控件名.Text = "欲显示的文本内容"
如要在一个名为 TxtFont 的文本框控件中显示隶书字样,那么输入代码:
TxtFont.Text = "隶书"
习题一:创建一个文本框(TxtContent)用来显示文本;按钮一(Cmd1),点击时文本框内容变为跟我来学VB神童教程;按钮二(Cmd2),点击时文本框内容清空(也就是没有内容)。
答案:见答案区。
2SelText(选中文本)属性:
本属性返回或设置当前所选文本的字符串,如果没有选中的字符,那么返回值为空字符串即""
请注意,本属性的结果是个返回值,或为空,或为选中的文本。
一般来说,选中文本属性跟文件复制、剪切等剪贴板(在 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
3SelStart SelLength 属性:
SelStart ,选中文本的起始位置,返回的是选中文本的第一个字符的位置。
SelLength ,选中文本的长度,返回的是选中文本的字符串个数。vb开始按钮代码 例如:文本框 TxtContent 中有内容如下:
跟我一起学习 VB 神童教程
假设选中一起学习四个字,那么,SelStart 3 SelLength 4
4MaxLength(最大长度)属性:
本属性限制了文本框中可以输入字符个数的最大限度,默认为 0 ,表示在文本框所能容纳的字符数之内没有限制,文本框所能容纳的字符个数是 64K ,如果超过这个范围,则应该用其他控件来代替文本框控件。
这跟 Windows 中用记事本打开文件一样,当文件过大,系统会自动调用写字板来打开文件,
而不是用记事本。
文本框控件 MaxLength 属性既可以在界面设置过程中予以指定,如图四:

图四
也可以在设计时予以改变,代码如下:
文本框控件名.Maxlength = XX为阿拉伯数字,如 102057,等等)。
5MultiLine(多行)属性:
本属性决定了文本框是否可以显示或输入多行文本,当值为 True ,文本框可以容纳多行文本;当值为 False ,文本框则只能容纳单行文本。
本属性只能在界面设置时指定,程序运行时不能加以改变。如图五: