【烟花原创】VBA零基础之第188篇VBA函数之转换（一）

1>CBool函数

功能：将表达式转换为Boolean。

语法：CBool(expression)

expression 是任意有效的表达式。

说明：

如果expression的值不为零，则 CBool 返回 True；否则，返回 False如果 expression 不能解释为数值，则将发生运行时错误。

示例：

2>CByte函数

功能：将表达式转换为Byte。

语法：CByte(expression)

expression 参数是任意有效的表达式。

说明：

如果 expression 在 Byte 子类型可接受的范围之外，则发生错误。

示例：

在转换的时候，如果有小数位，则会参照四舍六入五单双的原则做进位处理。

3>CCur函数

功能：将表达式转换为Curcency

语法：CCur(expression)

expression 参数是任意有效的表达式。

说明：

CCur 函数用于进行从其他数据类型到 Currency 子类型的国际公认的格式转换。例如，对十进制分隔符和千位分隔符的识别取决于系统的区域设置。

Currency范围：-922,337,203,685,477.5808 至922,337,203,685,477.5807。

小数点后数字有效位只有4位。

通常，在编码时可以使用数据类型转换函数，来体现某些操作的结果应该表示为特定的数据类型，而不是缺省的数据类型。例如，当单精度、双精度或整数运算发生的情况下，使用 CCur 来强制执行货币运算。

应该使用数据类型转换函数来代替 Val，以使国际版的数据转换可以从一种数据类型转换为另一种。例如，当使用 Ccur 时，不同的小数点分隔符、千分位分隔符和各种货币选项，依据系统的区域设置都会被妥善识别。

示例：

4>CDate函数

功能：将表达式转换为Date

语法：CDate(date)

date 任何有效的日期表达式。

使用 IsDate 函数，可判断 date 是否可以被转换为日期或时间。Cdate 可用来识别日期文字和时间文字，以及落入可接受的日期范围内的数值。当转换一个数字成为日期时，是将整数部分转换为日期，小数部分转换为从午夜起算的时间。

CDate 依据系统上的区域设置来决定日期的格式。如果提供的格式为不可识别的日期设置，则不能正确判断年、月、日的顺序。另外，长日期格式，若包含有星期的字符串，也不能被识别。

示例：