- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 关于日期，求教大家！ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=43132)
-- 发布时间：2013/11/30 9:11:00
-- 关于日期，求教大家！
现在有两列，A列是时间，B列是人。如何找出同一人名下的最晚时间？并且如果找到的时间比今天小7天的话，标记为红色？
-- 发布时间：2013/11/30 9:19:00
--
Dim dr As DataRow = DataTables("表A").Find("B列=\'张三\'","A列 DESC")
MessageBox.show("张三最晚时间为" & dr("A列"))
标出单元格
看帮助一定要按顺序，头一两遍可以不求甚解，第三遍开始要将每个例子实际操作演练一遍，不明白的就上论坛求助。
三遍之后才开始做系统，先设计好表，想做什么功能，就做什么功能，遇到问题在帮助找答案，找不到的在论坛提问，不断遇到问题，不断解决问题，慢慢就熟悉了。
此外一定要先掌握《使用指南》，然后再看《开发指南》
-- 发布时间：2013/11/30 9:21:00
--
谢谢！！
-- 发布时间：2013/11/30 9:22:00
--
事先定义好“样式一”
在表属性，DrawCell 中输入一下的代码
Dim nms as List (Of String) = DataTables("表名").GetValues("B列")
Dim d as Date
For each nms0 as string in nms
d=
DataTables("表名").Compute("Max(A列)","B列 = ‘“ & nms0 & ”’")if e.Row（“ A列”）= d And e.Row("B列") = nms0 then
e.Style = "样式一"
end if
Next