全局常量用返回值初始化

时间:2014-11-25 14:16:23

标签: vb6

请参阅以下Globals.bas代码:

Public Const Day = "Tuesday"

我已宣布一个名为Day and Day的常量在整个项目中可用,所以我可以在任何地方执行此操作,我将会被提示:星期二:

msgbox(Day)

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

Public Const Day = getDay

getDay是一个返回日期的函数吗?

在VB.NET中你有应用范围。如果在使用VB6时有类似的东西,我会徘徊。

1 个答案:

答案 0 :(得分:2)

您无法将函数分配给全局常量。你可以创建一个全局函数。

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

然后就这样称呼它:

day = GetDay()