DateString 属性

更新：2007 年 11 月

返回或设置一个 String 值，该值表示与系统对应的当前日期。

Public Property DateString As String

异常

异常类型	错误号	条件
InvalidCastException	5	用于设置 DateString 值的格式无效。

如果正在升级使用无结构错误处理的 Visual Basic 6.0 应用程序，请参见“错误号”一列。（您可以根据 Number 属性（Err 对象）比较错误号。）然而，如果可能，应当考虑用 Visual Basic 的结构化异常处理概述替换这种错误控制。

DateString 总是将使用月份名缩写的系统日期返回成“MM-dd-yyyy”。接受的日期设置格式是“M-d-yyyy”、“M-d-y”、“M/d/yyyy”和“M/d/y”。这些格式为区域性固定格式，这意味着即使更改“控制面板”中的“区域选项”，它们也不会变化。

若要以 String 的形式获取或设置当前系统时间，请使用 TimeString 属性属性。

若要以您所在的区域的格式或自定义格式获取当前系统日期或时间，请将 Now 属性提供给 Format 函数，指定使用预定义日期/时间格式（Format 函数）还是用户定义的日期/时间格式（Format 函数）。下面的示例说明了这一点。

MsgBox("The formatted date is " & Format(Now, "dddd, d MMM yyyy"))

若要将当前系统日期当作 Date 来访问，请使用 Today 属性。

安全说明：
设置系统日期或时间需要非托管代码权限，这可能会对它在部分信任情况下的执行产生影响。有关更多信息，请参见 SecurityPermission 和代码访问权限。

下面的示例使用 DateString 属性显示当前系统日期。

MsgBox("The current date is " & DateString)

**模块：**DateAndTime

**程序集：**Visual Basic 运行库（在 Microsoft.VisualBasic.dll 中）

由于 DateString 是模块的成员，而不是类的成员，因此您不需要创建用于访问 DateString 的对象。

通过使用 DateString 属性，您可以获取但不能设置系统日期。