Question

保存在数据库中的最后日期是： 6/13/2012 12:27:30 PM

在我的DateTime中现在是： 6/13/2012 01:27:57 AM

但是，当我执行此功能时，它总是说： “日期已手动修改，请设置为有效日期时间”

但是，DateTime Now并不比我数据库中的Date少。怎么了？

这是代码，请更正，

Private lastdate As DateTime
Private Sub GetDBdate()
...
    Dim ss As String
    Dim sc As New SQLiteCommand
    ss = "select dtime from dincome order by dtime desc limit 1"
    sc = New SQLiteCommand(ss, mycon)
    lastdate = CDate(sc.ExecuteScalar)
End Sub



    Private Function CheckValidDate() As Boolean
    Dim dtnow As DateTime = DateTime.Now
    If dtnow < lastdate Then
        Return False
    End If
    Return True
    End Function




    Private Sub Button_Click
    If Not CheckValidDate() Then
    label1.Text = "Date has been manually modified, Please Set to Valid DateTime"
        Exit Sub
    End If
    ...
    ...
    Exit Sub

Answer 1

你的时间大概是一小时。你检查过你的时区设置了吗？这在过去引起了我的问题。

Answer 2

这是一个24小时的问题，我想，昨天我从

中删除了tt

Dim dt As DateTime = DateTime.Now.ToString（“yyyy-MM-dd hh：mm：ss”）

应该是：

Dim dt As DateTime = DateTime.Now.ToString（“yyyy-MM-dd hh：mm：ss tt”）

非常感谢

日期之前的vb.net现在小于datetime

2 个答案: