以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何获得上一行  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=47959)

--  作者:lfxxdt
--  发布时间:2014/3/20 13:15:00
--  如何获得上一行

Dim dr As DataRow = e.DataTable.DataRows(e.DataTable.DataRows.Count - 1) \'获得最后一行

这段代码是获得表最后一行,如果是要获得上一行,应该如何写


--  作者:y2287958
--  发布时间:2014/3/20 13:18:00
--  
用find
--  作者:lfxxdt
--  发布时间:2014/3/20 13:28:00
--  
用find不行,我主要是对考勤机上的数据进行判断处理的,一个人一天打四次卡,8点一次是上班,12点到13点两次是下班和上班,17点一次是下班,现在主要是12点到13点两次不知如何判定,如果能获得上一行,那么就判断上一行如果是12点,那么本行就是上班,否则的话就是下班。
--  作者:lsy
--  发布时间:2014/3/20 13:38:00
--  
If Tables("出勤表").Current IsNot Nothing AndAlso Tables("出勤表").Current.Index > 0 Then
    Dim dr As DataRow = Tables("出勤表").Rows(Tables("出勤表").Current.Index - 1).DataRow
End If

--  作者:lfxxdt
--  发布时间:2014/3/20 14:53:00
--  
已知道了,谢谢