如何为可选参数分配默认日期时间 ( Now ) 值。
将 now 对象分配给以下错误的可选参数时
Constant expression is required
代码:
Public Sub ReminderMail(Optional ByVal ReminderMailDate As DateTime = Now)
// Code Block
End Sub
请您参考如下方法:
尝试这个 :
Public Sub ReminderMail(Optional ByVal ReminderMailDate As DateTime = Nothing)
If ReminderMailDate = Nothing Then ReminderMailDate = Now
// Code Block
End Sub




