parameters - 在 Visual Basic VB.Net 2010 中使用 System.DateTime 类型作为可选参数

Question

我试图将可选的 System.DateTime 参数传递给 VB.NET 2010 中的构造函数。

...
Public Sub New(Optional ByVal givendate As System.DateTime = System.DateTime.MinValue)
    ...

我收到错误“Konstanter Ausdruck erforderlich”，翻译为“需要恒定值”。我尝试用 MinValue 填充变量，但我必须将此变量设置为只读，这在尝试将默认值传递给可选参数时会导致完全相同的问题。 有没有办法将 MinValue 作为默认值传递给可选的 DateTime (实际上是 Date 类型)。 感谢各位观众。

Answer 1

您可以将函数参数的默认值设置为Nothing，然后在函数中设置今天的日期时间

Public Sub New(Optional ByVal fDate As System.DateTime = Nothing)
        If fDate = Nothing Then
            fDate = Now
        End If
    End Sub