如何在 BASIC 中修剪字符串？答案

【问题标题】：How can I trim a string in BASIC?如何在 BASIC 中修剪字符串？
【发布时间】：2013-08-03 02:39:42
【问题描述】：

如何修剪字符串中的字符，你想要多少？

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

Sub Main()

Dim s As String
Dim Result As String

s = "Tony"
Result = LTrim(s)

msgbox(Result)

到目前为止，我使用的是 LTrim 函数，那么如何指定要剪切多少才能在 MessageBox 中显示“ny”？

【问题讨论】：

这真的是 BASIC 还是 VB6 或 VB.NET？这些不是一回事。

标签： basic qbasic

【解决方案1】：

你不想要LTrim。你要Right:

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

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

【讨论】：

感谢 Michael 的回复，所以说我想剪掉 3 个字符，对代码的调整是 Result = Right(s, Len(s) - 3) 正确吗？？

【解决方案2】：

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

我会先反转字符串，然后使用remove函数切断现在的结尾，然后再次使用reverse函数将剩余的字符串翻转回原来的状态。

代码如下所示：

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

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

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

【讨论】：

根据help section，请不要在您的问题或答案上添加签名/签字。

【解决方案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

【讨论】：