处理字符串中的字符
发布时间：2010/7/20 10:38:17 来源：城市学习网 编辑：ziteng
导读:当要处理字符串中的每一个字符时，可以将字符串赋值到一个byte数组中进行操作。要记住：每一个Unicode字符对应双字节。这种方法通常要快许多，因为节省了大量的Mid$函数操作以及大量的临时字符串空间。下面的代码是统计字符串中空格数目的最快方法
Dim b() as Byte, count As Integer
b() = source$
For i = 0 to UBound(b) Step LenB("A")
If b(i) = 32 Then count = count + 1
Next
请注意上面代码中LenB()函数的特殊用法：在VB4（32位）、VB5和VB6中它返回数值2, 在VB4（16位）中返回数值1。因此，我们就可以使用同一代码段，而无需#If编译指令。
