Question

如何根据您的需要修剪字符串中的字符？

例如，假设您的字符串是“Tony”，但是您希望通过修剪前两个字符来显示“ny”，这怎么办？

Sub Main()

Dim s As String
Dim Result As String

s = "Tony"
Result = LTrim(s)

msgbox(Result)

到目前为止我使用LTrim函数，所以你如何指定你想要切割多少才能在MessageBox中显示“ny”？

Answer 1

您不希望LTrim。你想要Right：

Result = Right(s, Len(s) - 2);

除了s这两个最左边的字符之外，这将占用所有字符。

Answer 2

嗯......如果我试图剪掉一个字符串的开头，我会使用两个函数：StrReverse和Remove。

我首先将字符串反转，然后使用remove函数切断现在结束的内容，然后再使用反向函数将剩余的字符串翻转回原始状态。

代码看起来像这样：

    Dim s As String = "Anthony"
    Dim index As Integer = 2

    Debug.Print(StrReverse(StrReverse(s).Remove(2)))

这个输出将是“ny”，长度将对应于索引。

Answer 3

您可以使用其他字符串函数执行相同的操作，例如：

X$ = RIGHT$(V$, 2) ' get the ending 2 chars of string
X$ = LEFT$(V$, 2) ' get the leading 2 chars of string
X$ = MID$(V$, 2, 2) ' get 2 chars from the inside of string

如何在BASIC中修剪字符串？

3 个答案: