请问VB中怎么清除TEXT中指定的文本

使用Replace(expression, find, replacewith[, start[, count[, ompare]]])这个函数，所谓清除就是将指定字符（串）替换为“空”。

大可这样 *** 作：

Text1Text="123456789"

Text1Text=Replace(Text1Text,"34","")'这时Text1Text="1256789"

Text1Text=Replace(Text1Text,"9","") '这时Text1Text="125678"

既然你可以用BACKSPACE来删除文字，那你在VBNet中你可以模拟一下按下键盘BACKSPACE啊！！你找一下Sendkey类的send（）方法！在C#中可以这么做SendkeySend("{BACKSPACE}");我不太会VB的语法，所以不知道这个在VB中是不是这么写，你可以查一下!!

建议你使用组合框。将组合框Combo1的Style属性设置为1

Private Sub Command1_Click()

Open AppPath & "\1txt" For Input As #1

Do While Not EOF(1)

Input #1, sj

Combo1AddItem sj

Loop

Combo1Text = Combo1List(0)

Close #1

End Sub

Private Sub Command2_Click()

Randomize (Timer)

k = Int(Rnd Combo1ListCount)

For i = 1 To 1000

For j = 0 To Combo1ListCount

DoEvents

Combo1Text = Combo1List(j)

If i = 1000 And j = k Then GoTo KK

Next j

Next i

KK:

MsgBox "恭贺" & Combo1List(k) & "中奖！"

Combo1RemoveItem k

End Sub

以上就是关于请问VB中怎么清除TEXT中指定的文本全部的内容，包括:请问VB中怎么清除TEXT中指定的文本、在VB.NET中怎样用一个按钮来逐个删除文本中的文字、怎样用VB删除掉文本中指定的内容等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！