ISNumeric 函数

返回一个指示表达式是否可以作为数字进行求值的布尔值。

语法

IsNumeric(expression)

注释

expression 参数可以是任何表达式。

如果整个表达式被识别为数字，则 IsNumeric 返回 True；否则返回 False。如果 expression 是日期表达式，则 IsNumeric 返回 False。

以下示例使用 IsNumeric 函数确定变量是否可以作为数字进行求值：

示例 1：

Dim MyVar, MyCheck
MyVar = 53   ' Assign a value.
MyCheck = IsNumeric(MyVar)   
' Output: True.

示例 2：

MyVar = "459.95"   ' Assign a value.
MyCheck = IsNumeric(MyVar)  
' Output: True.

示例 3：

MyVar = "45 Help"   ' Assign a value.
MyCheck = IsNumeric(MyVar)   'Output: False

示例 4：

Dim MyVar, MyCheck
MyVar = CDate("2023-01-21" )  ' Assign a date
MyCheck = IsNumeric(MyVar)
'Output: False

示例 5：

MyVar = "3.14"   ' Assign a floating-point number as a string.
MyCheck = IsNumeric(MyVar)
'Output: True

示例 6：

MyVar = vbTrue   ' Assign a Boolean value.
MyCheck = IsNumeric(MyVar)   
'Output: True