在MS Access VBA中，返回时间的功能是什么？ （不是日期和时间）

Question

如何在Access VBA中获取当天的时间？我正在尝试构建一个字符串来命名一个具有时间值的文件。我不想要datetime值，只需要时间值。像Now（）函数一样：

CurrentTime = Now()

但我只想要当前的时间。

Answer 1

要检索表示时间的字符串值，请使用以下示例：

Dim CurrentTime As String
CurrentTime = Time()

直接从datetime类型的变量中提取时间值：

Dim ExampleDateTime As DateTime
Dim TimeString As String
ExampleDateTime = Now()
TimeString = Format(ExampleDateTime, "mmm d, yyyy h:nn:ss AMPM")

Answer 2

你当然不应该为datetime使用字符串变量。始终 - 没有例外 - 使用日期：

Dim CurrentTime As Date
CurrentTime = Time

然后，为了显示或报告，请根据需要对其进行格式化。