如何在BASIC中裁剪字符串？

Question

如何截取字符串中的字符，精确指定需要截取的字符数量？

例如，假设你有一个字符串"Tony"，但你想截取掉前两个字符并显示"ny"，该怎么做呢？

Sub Main()

Dim s As String
Dim Result As String

s = "Tony"
Result = LTrim(s)

msgbox(Result)

目前我仅使用LTrim函数，那么如何指定要剪切的内容，以便仅在MessageBox中显示“ny”？

- user2634746

---

这真的是BASIC吗？还是VB6或VB.NET？它们并不相同。 - MPelletier

Answer 1

您不需要使用LTrim, 您需要使用Right:

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

这将获取字符串s除了前两个字符以外的所有字符。

- jason

---

感谢您的回复，Michael。如果我想要剪切3个字符，那么代码的调整应该是Result = Right(s, Len(s) - 3)，对吗？ - user2634746

Answer 2

你可以使用附加的字符串函数来完成相同的操作，例如：

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

- eoredson

Answer 3

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

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

代码大致如下：

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

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

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

- nick

---

根据帮助文档，请不要在您的问题或答案中添加签名或署名。 - John Parker