怎样对字符串进行按字符操作？

Question

这段代码可以取出每一个字符：Private Sub Command1_Click()
Dim a As String
a = "你们好！能帮我吗？"Dim i As IntegerFor i = 1 To Len(a)
   MsgBox Mid(a, i, 1)
Next iEnd Sub

Answer 1

Mid 函数
      返回 Variant (String)，其中包含字符串中指定数量的字符。语法Mid(string, start[, length])Mid 函数的语法具有下面的命名参数：部分 说明 
string 必要参数。字符串表达式，从中返回字符。如果 string 包含 Null，将返回 Null。 
start 必要参数。为 Long。string 中被取出部分的字符位置。如果 start 超过 string 的字符数，Mid 返回零长度字符串 ("")。 
length 可选参数；为 Variant (Long)。要返回的字符数。如果省略或 length 超过文本的字符数（包括 start 处的字符），将返回字符串中从 start 到尾端的所有字符。