这是问题所在,我传递一个日期以下列格式运行:mm/dd/yyyy。 当我将日期作为 02/02/2010 传递给函数时,它总是返回 true 但我已经提出条件,如果日期小于系统日期,它应该返回 false 但对于输入的日期小于系统 date.heres 仍然返回 true函数。
Private Function expiryvalidate(ByVal exp As String) As Boolean
Dim ee As String
ee = Format(CDate(exp), "MM/dd/yyyy")
Dim dd As String = Format(DateTime.Now, "MM/dd/yyyy")
If ee <> "0" Then
If ee < dd Or ee = dd Then
Return False
Else
Return True
End If
Else
Return True
End If
End Function
最佳答案
如果您可以将日期作为 Date
类型传递,那么它就像这样:
Private Function expiryvalidate(ByVal myDate As Date) As Boolean
Return myDate < Today
End Function
http://msdn.microsoft.com/en-us/library/system.datetime.today%28v=vs.110%29.aspx
如果作为参数传递的日期小于当前系统日期,则返回 true,否则返回 false。
如果你需要将日期作为字符串传递给函数,那么你可以这样调用它:
dim IsExpired as boolean = expiryvalidate(date.parse("mystringdate"))
关于vb.net - 如何检查输入的日期应该大于 vb.net 中的系统日期,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/20215611/