【VB】StrConv函数 vbUnicode用法

【VB】StrConv函数

StrConv(string, conversion, LCID)

vbUnicode	64	根据系统的缺省码页将字符串转成Unicode。
vbFromUnicode	128	将字符串由 Unicode 转成系统的缺省码页。

Windows系统对字符采用了DBCS编码，它是一套单字节和双字节的混合编码，即西文与ASCII编码一样，是单字节；中文则以两字节编码。

而StrConv()函数的作用就是作为Unicode与DBCS之间的转换。

bytes_Ansi()=StrConv("a啊b",vbFromUnicode)         '61 B0 A1 62

就是将Unicode码(VB缺省String类型）"a啊b"字符串转为DBCS码（转换成Ansi编码的串）

String1=StrConv(Bytes_Ansi(),vbUnicode)         '61 0 4A 55 62 0

将DBCS(即Ansi格式的数组）转为Unicode字符串(String)。

转换过程可以用LenB函数进行验证

由于VB中字符串均用二字节的Unicode表示，在进行文本文件读写时，会自动将String转换为合适的系统DBCS编码，无需专门的转换，但在Open语句Binary读写时，作者需先转换好。如在读写UTF8编码格式的文本文件时，必须使用Binary格式来读写。而一般的Unicode格式和Ansi格式文件，则不需要。

而通常的Bytes()与String间转换可直接赋值，应为

Dim bytes() as Byte,Str1 as string

str1="a啊b"     或 bytes=str1亦可

bytes=str1 即'61 0 4A 55 62 0，自动完成了转换