vb6 - vb6中如何解析字符串？

Question

不幸的是，我们中的一些人仍然支持 VB6 等旧版应用程序。我忘记了如何解析字符串。

给定一个字符串:

Dim mystring As String = "1234567890"

如何在 VB6 中循环遍历每个字符并执行类似的操作

   for each character in mystring
      debug.print character
   next

在 C# 中我会做类似的事情

 char[] myChars = mystring.ToCharArray();
 foreach (char c in theChars)
 {
    //do something with c
 }

有什么想法吗？

非常感谢

Answer 1

您可以使用“Mid”函数来获取单个字符:

Dim i As Integer
For i = 1 To Len(mystring)
    Print Mid$(mystring, i, 1)
Next

请注意，这尚未经过测试。