VBA中的十进制TryParse

Question

我正在尝试使用十进制进行tryparse;但是，我不断收到“Object Required”运行时错误。我不确定我做错了什么。我习惯在C＃中做一个tryparse。这是VBA，所以语言翻译还没有点击。任何帮助表示赞赏。

 Sub try()
        Dim val As Variant
        Dim res As Boolean

        res = Decimal.TryParse("2.5", val)
        MsgBox (res & ":" & val)
    End Sub

Answer 1

您可以尝试CInt并使用On Error Goto检查特定错误。

Answer 2

res = cBool(Val("2.5"))应该在这里做，因为任何值＆lt;＆gt; 0将评估为True