VB.NET 如何实现删去指定字符及以后的内容

t = "1234a789405450"

成都创新互联10多年成都企业网站建设服务;为您提供网站建设,网站制作,网页设计及高端网站定制服务,成都企业网站建设及推广,对LED显示屏等多个方面拥有丰富的网站推广经验的网站建设公司。

tt = InStr(t, "a") - 1

If tt 1 Then

t = Mid(t, 1, tt)

MsgBox t

End If

vb.net比较简单的方法删除指定的字符串

Dim regex=New System.Text.RegularExpressions.Regex("\(([^\)]*)\)")

Dim s= regex.Replace("(111)k(222)","$1")

vb编写一个函数，删除一个字符串中的特定字符

'定义一个find函数

Private Function find(s1 As String, s2 As String) As String

Dim i As Integer

For i = 1 To Len(s1)

If i = InStr(1, s1, s2, vbTextCompare) Then

find = Left(s1, i - 1) Right(s1, Len(s1) - Len(s2) - i + 1)

Exit Function

End If

Next i

find = s1

End Function

'将Text1.Text中的Text2.Text字符删除

Private Sub Command1_Click()

Dim s As String

s = find(Text1.Text, Text2.Text)

Text1.Text = s

End Sub

分享文章：vb.net删除指定字符,c语言删除特定字符
标题URL：http://lswzjz.com/article/dssocie.html