返回已转换为子类型 String 的变体的一个表达式。
语法
CStr(expression)
注释
expression 参数是任何有效的表达式。
通常，您可以使用数据类型转换函数来记录代码，以表明某个操作的结果应表示为特定数据类型，而不是默认数据类型。例如，使用 CStr 强制将结果表示为字符串。
应使用 CStr 函数（而不是 Str）来实现从任何其他数据类型到 String 子类型的国际化转换。例如，根据系统的区域设置，可以正确识别不同的小数分隔符。
表达式中的数据根据下表确定返回的内容：
表 11-8 表达式与返回内容的对应关系
| 如果 expression 为 | CStr 返回 |
|---|---|
| 布尔值 | 包含 True 或 False 的字符串。 |
| 日期 | 包含日期的字符串，日期采用系统短日期格式。 |
| Empty | 长度为零的字符串 (" ")。 |
| 其他数字 | 包含数字的字符串。 |
以下示例使用 CStr 函数将数值转换为字符串：
示例 1：
Dim MyDouble, MyString MyDouble = 437.324 ' MyDouble is a Double. MyString = CStr(MyDouble) ' MyString contains "437.324". 'Output: "437.324"
示例 2：
Dim MyBool MyBool = True ' MyBool is a Boolean. MyString = CStr(MyBool) ' MyString contains "True". 'Output: "True"
示例 3：
MyBool = False ' MyBool is a Boolean. MyString = CStr(MyBool) ' MyString contains "False". 'Output: "False"
示例 4：
Dim MyDate
MyDate = CDate("10/19/1962")
MyString = CStr(MyDate)
'Output: "19/10/1962" (or your system's short-date format)
示例 5：
Dim MyInt MyInt = 100 MyString = CStr(MyInt) 'Output: "100"
示例 6：
Dim MyValue MyValue = Empty MyString = CStr(MyValue) 'Output: ""
示例 7：
Dim MyLong MyLong = 1234567890 MyString = CStr(MyLong) 'Output: "1234567890"