Vb6 使用返回值初始化的全局常量

请参阅Globals.bas中的以下代码：

Public Const Day = "Tuesday"

Public Const Day = getDay

我已经声明在整个项目中都有一个名为Day和Day的常量，因此我可以在任何地方执行此操作，并将得到提示：星期二：

msgbox(Day)

是否可以在Globals.bas中执行此操作：

Public Const Day = "Tuesday"

Public Const Day = getDay

其中getDay是一个返回日期的函数

---

在VB.NET中，您有应用范围。我想知道在使用VB6时是否存在类似的情况。

您不能将函数指定给全局常量。您可以创建一个全局函数

Public Function GetDay() As String
  GetDay = "Tuesday"
End Function

那么就这样称呼它：

day = GetDay()

---

根据定义，常量需要在编译时已知，因此它不能是运行时确定的函数的结果