excel - 如何声明非变量类型

Question

如何声明我可以通过名称调用其声明的子级的类型？

像这样的事情:

德尔福:

TSuit = (Hearts, Diamonds, Clubs, Spades)

我想声明项目列表，它们不需要包含值，我可以在编写代码时调用它，以使代码更具可读性和更容易修改。

我尝试了这个，但我不知道该怎么做:

声明:

Public Enum EType
    square = 0
    triangle = 1
    circle = 2
End Enum

Public Sub LOK(line As Byte, SlType As EType)
    MsgBox ("test")
End Sub

调用:

LOK(1, square)

这在 VBA 中可能吗？

Answer 1

circle 好像是保留关键字，不能使用。如果您将其更改为 eCircle 等其他内容，一切都会按预期工作。

Option Explicit

Public Enum EType
    eSquare = 0
    eTriangle = 1
    eCircle = 2
End Enum

Public Sub LOK(line As Byte, SlType As EType)
    MsgBox "test: " & SlType
End Sub

Sub test()
    LOK 1, eSquare
    LOK 1, eTriangle
    LOK 1, eCircle
End Sub