Question

VB6_如何去除含有某些字符的项目。

建立一个listbox内容如下，需要筛选掉含有msn和qq的四项.(简单点好)
msn1
msn2
qq1
qq2
gtalk1
gtalk2

Answer 1

Private Sub Command1_Click()
Dim i As Integer
For i = 0 To List1.ListCount - 1
If List1.List(i) Like "msn*" Or List1.List(i) Like "qq*" Then
List1.RemoveItem (i)
i = i - 1
End If
Next

End Sub

Private Sub Form_Load()
With List1
.AddItem "msn1"
.AddItem "msn2"
.AddItem "qq1"
.AddItem "qq2"
.AddItem "gtalk1"
.AddItem "gtalk2"
End With

End Sub

Answer 2

看题意，就是去掉字符串两边的的两个英文标点留下中间的字符串内容吗？这个简单有效的就是下面这一句就搞定了，不需要复杂的代码：
假设字符串存在Str中，那么：
Str=Mid(Str,2,Len(Str)-2)
就OK啦，简单实用。

Answer 3

有到是有，要怎么给你啊，留个联系方式吧，我发给你

都发给你了，收到了吗

加油，祝你成功