[浏览完整版]
标题：列表达式问题
1楼
菜鸟冬瓜 发表于：2008/9/2 11:04:00在易表里的列表达式里加入 TODAY（） 就可以得到 我想到的结果－－－－＞当天的日期
可是在狐表里的列表达式里，我就不会加函数了。 看帮助文件也看不明白
Today
这是一个共享属性，返回计算机的当前日期，不含时间。
例如：
Dim
d As Date = Date.Today上述代码将变量d的值设为当前日期。
我就是想在日期列里得到当天的日期 怎么才能写这个表达式呢？
2楼
kylin 发表于：2008/9/2 11:07:00参考 取值代码
3楼
狐狸爸爸 发表于：2008/9/2 11:10:00呵呵，其实很容易，你要继续往下看，就会明白的。
4楼
狐狸爸爸 发表于：2008/9/2 11:11:00例如：
增加行的时候，日期列会自动填入当天日期。
代码在表的DataRowAdded事件中。
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目9_0902.zip |
增加行的时候，日期列会自动填入当天日期。
代码在表的DataRowAdded事件中。
[此贴子已经被作者于2008-9-2 11:11:57编辑过]
5楼
菜鸟冬瓜 发表于：2008/9/2 11:12:00看了 《取值代码》 还要等开发篇 是吗？
6楼
狐狸爸爸 发表于：2008/9/2 11:19:00对。
不过这个默认值，不需要去之代码，用DataRowAdded事件即可。
先不要急，慢慢来，看懂每一节，学习是水到渠成的事
7楼
菜鸟冬瓜 发表于：2008/9/2 11:22:00实际上我要建立一个[日期]列 ，这个列就是要得到今天的日期 。再建立一个[编号]列。以[日期]列为基础建立[编号]列。以前在易表里[编号]列用的刷新公式是："0"+text(number(format([日期],"yymmdd00"))+CountFor(GridName,"日期","=",[日期],1,Row)) 可是现在就不会了。
8楼
菜鸟冬瓜 发表于：2008/9/2 11:29:00狐狸爸爸说的 我记下了 应该认真的看懂每一节。 心急吃不了热豆腐！！
9楼
狐狸爸爸 发表于：2008/9/2 11:38:00我给你做了一个自动编号例子，不过最好以后再看：
其实代码原理一样：
'如果发生变化的是日期列，而且已经输入日期
If e.DataCol.Name = "日期" And e.Datarow.IsNull("日期") = False Then
Dim dt As Date = e.DataRow("日期") '获得输入的日期
'计算编号
e.Datarow("编号") = Format(dt,"yyMMdd") & Format(e.DataTable.Compute("Count(日期)", "[日期] = #" & dt & "# And [_identify] < " & e.DataRow("_Identify")) + 1,"000")
End If
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目9_0902.zip |
其实代码原理一样：
'如果发生变化的是日期列，而且已经输入日期
If e.DataCol.Name = "日期" And e.Datarow.IsNull("日期") = False Then
Dim dt As Date = e.DataRow("日期") '获得输入的日期
'计算编号
e.Datarow("编号") = Format(dt,"yyMMdd") & Format(e.DataTable.Compute("Count(日期)", "[日期] = #" & dt & "# And [_identify] < " & e.DataRow("_Identify")) + 1,"000")
End If
10楼
kylin 发表于：2008/9/2 11:44:00好东东，谢谢！