5、VBA 的日期时间函数与 IDE 组件使用指南

VBA 的日期时间函数与 IDE 组件使用指南

1. VBA 的日期和时间函数

Visual Basic 提供了许多易于使用的函数，这里介绍 Date 和 Time 两个函数，它们可用于 DrawText 宏。 Date 函数返回一个包含当前日期字符串的 Variant 类型， Time 函数返回一个包含当前时间字符串的 Variant 类型，字符串的内容和格式取决于 PC 的设置。

1.1 更新 DrawText 宏

由于 Date 和 Time 函数返回字符串，因此可在代码中需要字符串的地方使用它们。例如，将 DrawText 宏第 7 行的 “Hello” 字符串替换为 Date ：

ModelSpace.AddText Date, TextPosition, 0.75

注意，不需要将 Date 用引号括起来，因为它是函数名。如果使用引号，绘图中会显示字符串 “Date”。运行宏后，当前日期将显示在绘图对象的模型空间选项卡中。

若要同时将时间和日期添加到绘图中，可扩展代码语句：

ModelSpace.AddText Time & " " & Date, Te