Question

VB文本框怎样用代码删除选中的内容?

代码vb6.0和vb.net都可以。
比如文本框内容为“ABCDEFG"
其中我选中了“BC”
怎样点击按钮后删除选中的内容“BC"。
因为我用的文本框是RichTextBox1控件。所以不允许把格式也删除了。例如“A“字符原来背景颜色为红色，不能将红色删除了。

Answer 1

1、打开VB软件，在窗体上面添加一个文本框。

2、点击文本框，在右侧的属性窗口中，设置名称和数值，将文本内容清空。

3、在窗体上面，再添加一个水平滚动条。

4、点击水平滚动条，设置名称和数值，将Min设置为0,Max设置为100。（文本框中的输入的数范围为0-100）。将largechange设置为5，Smallchange设置为2。

5、双击文本框，弹出页面，开始编辑代码。

6、运行程序，在文本框中输入不同的数值（0-100以内的数值），删除选中的内容。

Answer 2

通过设置 TextBox..SelText = "" ，实现利用代码删除文本框中被选中的内容。

以下演示了这个方法

（1）新建一个VB工程

（2）在Form1上布置一个TextBox和一个Button

（3）窗体代码

Option Explicit

Private Sub Command1_Click()
    If Text1.SelLength = 0 Then
        MsgBox "没有选中的文本"
        Exit Sub
    End If
    '删除被选中的文本
    Text1.SelText = ""
End Sub

Private Sub Form_Load()
    '设置Text1
    Text1.Text = ""
    '允许显示多行
    Text1.MultiLine = True
    '显示垂直滚动条
    Text1.ScrollBars = 2
    '按钮提示
    Command1.Caption = "删除选中的文本"
End Sub

（4）运行效果

输入文字，选择文本

点击按钮删除

Answer 3

在VB中，文本框控件（TextBox控件）的SelText属性表示文本框控件中选中的文本内容。因此，要用代码删除文本框控件中选中的内容，只需下面一句代码便能实现：
Text1.SelText=""
另外，文本框控件还提供了SelLength和SelStart这两个与选中文本相关的属性给我们使用。适当运用好这些属性，可实现一些文本框的常见功能。

Answer 4

RichTextBox1控件的内容是存在TEXT这个属性中的，修改这个属性就可以了。

Answer 5

RichTextBox1.SelText = ""
一句就可以了