我有一个字符串,例如:
Dim str as string = xxxxxxxxxxxxxxxxxxxx£xxx£xxxx**£**xxxxxxxxxx
我想删除£
包围的*
,它始终位于某个位置(例如第11位)。整个字符串很长,总是改变大小,不能从头开始计算。我也不能使用Replace
,在其他位置可能有相同的字符,我不想删除。
解:
Dim rst As String = str.Remove(str.Length - 11, 1)
编辑:哎呀,我不知道我在第一部分的想法。
第一部分的正确版本是:
str = str.Substring(0, str.Len -13) + str.Substring(str.Len-11);
String.Delete
函数也可能存在重载,允许您使用负数来表示字符串末尾的字符数 - 我知道C#等价物可以。
如果它总是成为第11个字符,你可以做到这一点......
Dim strTargetString As String = "xxxYxxxxxxxxxx"
Dim strTargetString2 As String = "xxxxxxxYxxxxxxxxxx"
Dim strResult As String = Mid(strTargetString, 1, (Len(strTargetString) - 11)) & Microsoft.VisualBasic.Right(strTargetString, 10)
Dim strResult2 As String = Mid(strTargetString2, 1, (Len(strTargetString2) - 11)) & Microsoft.VisualBasic.Right(strTargetString, 10)
请注意,String.SubString是比Mid更现代的方法,但我是出于偏好和例子而使用它。
使用预测进行正则表达式替换操作时,这非常简单:
Dim str as String = "xxxxxxxxxxxxxxxxxxxx£xxx£xxxx£xxxxxxxxxx"
Dim str2 as String = Regex.Replace(str, "£(?=.{10}$)", String.Empty)
这将针对单个字符,后跟任意十个字符,然后是字符串的结尾,并将其替换为String.Empty
值(如果您愿意,则替换为""
)。