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