另辟蹊徑處理字符串中的字符：字節(jié)數(shù)組法

當(dāng)要處理字符串中的每一個(gè)字符時(shí)，可以將字符串賦值到一個(gè)byte數(shù)組中進(jìn)行操作。要記住：每一個(gè)Unicode字符對(duì)應(yīng)雙字節(jié)。這種方法通常要快許多，因?yàn)楣?jié)省了大量的Mid$函數(shù)操作以及大量的臨時(shí)字符串空間。下面的代碼是統(tǒng)計(jì)字符串中空格數(shù)目的最快方法
    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
    請(qǐng)注意上面代碼中LenB()函數(shù)的特殊用法：在VB4（32位）、VB5和VB6中它返回?cái)?shù)值2, 在VB4（16位）中返回?cái)?shù)值1。因此，我們就可以使用同一代碼段，而無需#If編譯指令。