字符串的长度你没有正确计算,对于象中日韩这样的双字节文字你应该使用 
Lenb(strconv(szText,VbConvertFromUnicode))
而不是
Len(szText)