StrConv 函数

StrConv 函数

返回一个variant 类型的值（字符串）转换为指定。语法StrConv（字符串，转换，LCID ）StrConv函数语法具有下面这些命名参数：

部件	说明
字符串	必填。字符串表达式，要转换。
转换	必填。整数。指定要执行的转换类型的值的总和。
LCID	可选。LocaleID（如果与系统 LocaleID 不同）。（系统 LocaleID 是默认设置）。

设置转换参数的设置是：

常量	值	说明
vbUpperCase	1	将字符串转换为大写字符。
vbLowerCase	2	将字符串转换为小写字符。
vbProperCase	3	将字符串中每个词的第一个字母转换为大写。
vbWide	4	将字符串中的窄（单字节）字符转换为宽（双字节）字符。
vbNarrow	8	将字符串中的宽（双字节）字符转换为窄（单字节）字符。
* * vbKatakana	16 *	将字符串中的平假名字符转换为片假名字符。
* * vbHiragana	32 *	将字符串中的片假名字符转换为平假名字符。
vbUnicode	64	将字符串转换为Unicode使用系统的默认代码页。（在 Macintosh 上不可用。）
vbFromUnicode	128	将字符串从 Unicode 转换为系统的默认代码页。（在 Macintosh 上不可用）

* 适用于东亚区域设置。* * 仅适用于日本。

请注意 由 Visual Basic for Applications 指定这些常量。因此，他们可能会在任何地方使用代码来代替实际值。大多数可以结合使用，例如， vbUpperCase + vbWide，除了它们是互斥的例如，当vbUnicode + vbFromUnicode。常量vbWide、 vbNarrow、 vbKatakana和vbHiragana会导致运行时错误时，它们不适用于在区域设置中使用。

以下是有效的字符分隔符为正确的写法：

空( Chr$ ( 0 ) )，

水平制表符 ( Chr$ ( 9 ) )，

换行符 ( Chr$ ( 10 ))，

垂直制表符 ( Chr$ ( 11 ) )，

换页符 ( Chr$( 12 ) )，

回车符 ( Chr$ ( 13 ) )，

空间 (SBCS) ( Chr$ ( 32 ) )。

对于DBCS，空间实际值因国家/地区。备注当从以 ANSI 格式的字节数组转换为字符串，则使用StrConv函数。当将这类数组以 Unicode 格式转换，使用赋值语句。

示例

此示例使用StrConv函数将 Unicode 字符串转换为 ANSI 字符串。

Dim i AsLong

Dim x() AsByte

x = StrConv("ABCDEFG", vbFromUnicode)    ' Convert string.

For i = 0 To UBound(x)

    Debug.Print x(i)

Next