VBA中将数字转换为字符串办法(cstr函数)

 在vba编程中，我们往往需要将数字转换为字符串使用，可借助cstr函数

Str 函数示例

CStr 函数示例
本示例使用 CStr 函数将一数值转换为 String。

Dim a, b
a = 437.324    ' a 为 Double 类型。
b = CStr(MyDouble)    ' b 的内容为“437.324”。

另附chr()函数

 函数示例
本示例使用 Chr 函数来返回指定字符码所代表的字符。

Dim a
a = Chr(65)    ' 返回 A。
a = Chr(97)    ' 返回 a。
a = Chr(62)    ' 返回 >。
a = Chr(37)    ' 返回 %。
  

返回 String，其中包含有与指定的字符代码相关的字符 。

语法

Chr(charcode)

必要的 charcode 参数是一个用来识别某字符的 Long。

说明

0 到 31 之间的数字与标准的非打印 ASCII 代码相同。例如，Chr(10) 可以返回换行字符。charcode 的正常范围为 0 – 255。然而，在 DBCS 系统，charcode 的实际范围为 -32768 到 65535。

注意 ChrB 函数作用于包含在 String 中的字节数据。ChrB 总是返回一个单字节，而不是返回一个字符，一个字符可能是一个或两个字节。ChrW 函数返回包含 Unicode 的 String，若在不支持 Unicode 的平台上，则其功能与 Chr 函数相同。

注意 Visual Basic for the Macintosh 不支持Unicode 字符串。因此，当n 值在128 – 65,535 范围内时， ChrW(n) 不能像在Windows环境中那样返回所有的 Unicode 字符。相反地，当Unicode 的n 值大于127 时，ChrW(n) 会试图做一个“最好的猜测”。因此，在Macintosh 环境中，不能使用ChrW 。