1、Select GetDate() 可能耗时超过1秒的时间,因为要连接数据库取得;
2、所以你查询的时候,应该允许有几秒的误差。
Dim d As Date = new Date(1900, 1, 1, dt.Hour, dt.Minute, dt.Second)
dr=DataTables("采集时间").Find("时间 >= #" & dt.AddSeconds(-5) & "# and 时间 <= #" & dt.AddSeconds(5) & "#")