VBA sin（）和cos（）麻烦

Question

我试图制作一些VBA形式并计算一些简单的值，但我不明白为什么VBA不会识别Sin（）和Cos（）函数。例如：我写了int（），VBA将它转换为Int（），但它与sin和cos不同。 而且，在我尝试编译代码之后

    Private Sub btn_exit_Click()
    Unload laborator_2
End Sub

Private Sub btn_start_Click()
    today.Caption = Date
    rnb_val.Caption = Int(Rnd * 90 + 1)
    sqrt_val.Caption = Sqr(rnb_val.Caption)
    si_val.Caption = sin(rnb_val.Caption * 3.14159 / 180)
    co_val.Caption = rnb_val.Caption * 3.1459 / 180
End Sub

我收到了这条消息：

Run-time error "424" Object required

我是VBA的新手，很抱歉，如果我没有写完所有细节。谢谢。

Answer 1

罪恶与罪恶cos不是内置到vba中的函数。但是，它们内置于excel中，可以通过$ WorksheetFunction $对象作为$ WorksheetFunction.Sin $和$ WorksheetFunction.Cos $来访问。您可以在电子表格中使用的任何功能都可以通过这种方式访问​​。

Answer 2

检查您在表单上为标签指定的名称 - 它们必须与代码中的名称完全匹配。我通过命名si_val标签sival来获得相同的错误。

Answer 3

我必须在顶部添加Imports System.Math，以使编译器能够识别Sin，Cos等（which I found here in the docs）。