主题：求，打卡数据处理思路，删除中间多余数据。

t.sort = "工号,时间"

dim r1 as row = t.rows(t.rows.count - 1)

dim r as row

for i as integer = t.rows.count - 2 to 1 step -1

r = t.rows(i)

if r1("工号") = r("工号") andalso r1("时间").date = r("时间").date andalso t.rows(i-1)("工号") = r("工号") andalso t.rows(i-1)("时间").date = r("时间").date

r.delete

else

r1=r

end if

next

sj列是字符列，不是日期列