VB程式撰寫問題求解

各位先進你好，小弟最近在測試VB程式
已經有寫一些了，但是卡在一個地方
想請各位先進幫忙

以下是我的程式碼

If optDAY.Value = True Then
sWhereDate = "WHERE year(FloatTable.DateAndTime) = " & strYEAR & " and month(FloatTable.DateAndTime) = " & strMONTH & " and day(FloatTable.DateAndTime) = " & strDAY & " and minute(FloatTable.DateAndTime) = 00"
Else
sWhereDate = "WHERE year(FloatTable.DateAndTime) = " & strYEAR & " and month(FloatTable.DateAndTime) = " & strMONTH & " and hour(FloatTable.DateAndTime) = 00 and minute(FloatTable.DateAndTime) = 00"
End If

我是用VB搭配Access去抓取資料,以下是抓取出來的結果

2014/7/6 00:00	1	2	3	4
2014/7/6 01:00	1	2	3	4
2014/7/6 02:00	1	2	2	3
2014/7/6 03:00	1	2	32	143
2014/7/6 04:00	1	34	3	23
2014/7/6 05:00	11	12	21	43
2014/7/6 06:00	1	234	123	321
2014/7/6 07:00	1	131	132	212
2014/7/6 08:00	1325	21	53	34
2014/7/6 09:00	1232	21	12	32
2014/7/6 10:00	2	212	33	12
2014/7/6 11:00	4	343	123	12
2014/7/6 12:00	3	45	646	44
2014/7/6 13:00	2	134	23	23
2014/7/6 14:00	3	436	54	43
2014/7/6 15:00	23	23	23	65
2014/7/6 16:00	23	23	434	432
2014/7/6 17:00	43	55	24	3
2014/7/6 18:00	5	2	2	4
2014/7/6 19:00	5	4	3	2
2014/7/6 20:00	32	32	34	34
2014/7/6 21:00	23	53	23	33
2014/7/6 22:00	32	32	33	3
2014/7/6 23:00	23	23	32	32

小弟想要在最後一筆多抓明天的 00:00 的數值
所以這一個檔案裡面就會有今天00:00到明天的00:00的數值
這樣我VB要怎撰寫，請先進幫忙解答
謝謝。