- 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=133812)
-- 发布时间：2019/4/21 9:10:00
-- [求助]公司需要每日抄电表，表里有日期、起码、止码、本日用量四列，现在想实现的是当输入今天的起码后，自动输入前一天的止码，（本日起码就等于前一天的止码），哪位老师看看，代码应该怎么写？
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:测试.table |
-- 发布时间：2019/4/21 11:23:00
--
表的DataColChanged事件代码
Select Case e.DataCol.Name
Case "起码"
Dim dr As DataRow = e.DataTable.Find("[日期] = #" & e.DataRow("日期").AddDays(-1) & "#")
If dr IsNot Nothing Then
dr("止码") = e.DataRow("起码")
End If
End Select