以文本方式查看主题
- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]判断并记录时间 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=72007)
|
-- 作者:260964006
-- 发布时间:2015/7/22 9:26:00
-- [求助]判断并记录时间
If e.Col.Name = "合同回寄日期" Then \'记录合同回寄日期 If e.Row("合同回寄与否") = True Then e.Row("合同回寄日期") = Date.Today End If End If
如果逻辑列"合同回寄日期"是true,则"合同回寄日期"自动填充当天时间。上述程序怎么不对呢?
|
-- 作者:大红袍
-- 发布时间:2015/7/22 9:33:00
--
If e.Col.Name = "合同回寄与否" Then \'记录合同回寄日期 If e.Row("合同回寄与否") = True Then e.Row("合同回寄日期") = Date.Today End If End If
[此贴子已经被作者于2015/7/22 9:33:35编辑过]
|
-- 作者:260964006
-- 发布时间:2015/7/22 9:34:00
--
什么意思?
|
-- 作者:大红袍
-- 发布时间:2015/7/22 9:35:00
--
刷新看2楼
|
-- 作者:260964006
-- 发布时间:2015/7/22 9:41:00
--
此主题相关图片如下:catch.jpg
我在表属性 datacolchanged 里面用成程序怎么提示如图呢?难道不应该放这里?
|
-- 作者:大红袍
-- 发布时间:2015/7/22 9:44:00
--
If e.DataCol.Name = "合同回寄与否" Then \'记录合同回寄日期 If e.DataRow("合同回寄与否") = True Then e.DataRow("合同回寄日期") = Date.Today End If End If
[此贴子已经被作者于2015/7/22 9:44:06编辑过]
|
-- 作者:260964006
-- 发布时间:2015/7/22 10:21:00
--
If e.DataCol.Name = "合同回寄与否" Then \'记录合同回寄日期 If e.DataRow("合同回寄与否") = True Then e.DataRow("合同回寄日期") = Date.Today If e.DataRow("合同回寄与否") = False Then e.DataRow("合同回寄日期").isnull("合同回寄日期") = Nothing End If End If End If
程序加句("合同回寄与否") = False,则("合同回寄日期")为空。
|
-- 作者:大红袍
-- 发布时间:2015/7/22 10:22:00
--
If e.DataCol.Name = "合同回寄与否" Then \'记录合同回寄日期 If e.DataRow("合同回寄与否") = True Then e.DataCol("合同回寄日期") = Date.Today Else e.DataCol("合同回寄日期") = Nothing End If End If
[此贴子已经被作者于2015/7/22 10:22:14编辑过]
|