ms-access - 自定义 VBA 函数中的智能感知功能？

Question

在 VBA 的标准 IDE 中，很多标准 VBA 函数都内置了智能感知。即 msgbox() 的按钮变量为您提供了一个关于如何显示消息框的选项列表。这样，开发人员不必在每次使用函数时记住或查找选项。

我可以为我的自定义 VBA 函数实现相同的功能吗？这是一个粗略的例子，但我可以写一些类似的东西:
Public Function DoSomething(X as string)(Options X="Opt1","Opt2") as variant...
当我调用这个函数时，我会得到一个弹出窗口，给出 X 作为 Opt1 和 Opt2 的选项

Answer 1

您需要声明自己的枚举，然后将函数的参数定义为该枚举类型。

Public Enum eOptions
   Option1
   Option2
End Enum

public Function DoSomething(ByVal x as string, Byval MyOption as eOptions)

当你调用函数ala时:

Call DoSomething("myValue", Option2)

您将看到该函数的第二个参数可用的值是“Option1”或“Option2”。