[浏览完整版]
标题：用表达式求年月日的例子，请各位测试一下...
1楼
贺老六 发表于：2008/9/19 11:21:00这些表达式只适合中文操作系统，而且控制面板之区域和语言中的相关设置没有更改过。
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目15.table |
[此贴子已经被作者于2008-9-19 11:29:29编辑过]
2楼
kylin 发表于：2008/9/19 11:34:00OK！
收藏
收藏
[此贴子已经被作者于2008-9-19 11:35:53编辑过]
3楼
狐孩儿 发表于：2008/9/19 12:32:00還是這樣通用些
If CurrentTable.Rows(e.DataRow("_Identify")-1)("日期") IsNot Nothing Then
e.DataRow("月份")= CurrentTable.Rows(e.DataRow("_Identify")-1)("日期").Month
End if
If CurrentTable.Rows(e.DataRow("_Identify")-1)("日期") IsNot Nothing Then
e.DataRow("月份")= CurrentTable.Rows(e.DataRow("_Identify")-1)("日期").Month
End if
4楼
lxl 发表于：2008/9/19 12:39:00以下是引用狐孩儿在2008-9-19 12:32:00的发言：
還是這樣通用些
If CurrentTable.Rows(e.DataRow("_Identify")-1)("日期") IsNot Nothing Then
e.DataRow("月份")= CurrentTable.Rows(e.DataRow("_Identify")-1)("日期").Month
End if
還是這樣通用些
If CurrentTable.Rows(e.DataRow("_Identify")-1)("日期") IsNot Nothing Then
e.DataRow("月份")= CurrentTable.Rows(e.DataRow("_Identify")-1)("日期").Month
End if
效率上不说，你的代码能简化成
If e.DataRow("日期") IsNot Nothing Then
e.DataRow("月份")= e.DataRow("日期").Month
End if
5楼
cpayinyuan 发表于：2008/9/19 12:43:00以下是引用lxl在2008-9-19 12:39:00的发言：
效率上不说，你的代码能简化成
If e.DataRow("日期") IsNot Nothing Then
e.DataRow("月份")= e.DataRow("日期").Month
End if
估计不行吧，贺老师上午刚刚说过表达式中不能使用Month啊！
6楼
狐孩儿 发表于：2008/9/19 12:47:00以下是引用lxl在2008-9-19 12:39:00的发言：
效率上不说，你的代码能简化成
If e.DataRow("日期") IsNot Nothing Then
e.DataRow("月份")= e.DataRow("日期").Month
End if
呵呵,多謝版主指點,我也試過用DataRow,只是多次沒寫成.這次記住了:e.DataRow("日期") 表示引用當前行日期列數據.
7楼
lxl 发表于：2008/9/19 12:47:00以下是引用cpayinyuan在2008-9-19 12:43:00的发言：
估计不行吧，贺老师上午刚刚说过表达式中不能使用Month啊！
那个是计算代码里面用的，所以我前面说了：效率先不说。
表达式里面不光Month不能用 e DataRow 这些代码都不支持。
8楼
czy 发表于：2008/9/19 12:47:00以下是引用贺老六在2008-9-19 11:21:00的发言：
这些表达式只适合中文操作系统，而且控制面板之区域和语言中的相关设置没有更改过。
| 下载信息 [文件大小：324.0 KB 下载次数：18] | |
 点击浏览该文件:管理项目15.table |
[此贴子已经被作者于2008-9-19 11:29:29编辑过]
收藏。
顶你没商量。
9楼
czy 发表于：2008/9/19 12:48:00以下是引用cpayinyuan在2008-9-19 12:43:00的发言：
估计不行吧，贺老师上午刚刚说过表达式中不能使用Month啊！
3、4楼是计算代码，不是表达式。
10楼
狐孩儿 发表于：2008/9/19 13:18:00這個用表达式求月，適用日期格式:D/M/YYYY
SubString(Convert([日期],'System.String'),IIF(SubString(Convert([日期],'System.String'),1,2) Like '*/*',3,4),IIF(SubString(Convert([日期],'System.String'),IIF(SubString(Convert([日期],'System.String'),1,2) Like '*/*',3,4),2) Like '*/*',1,2))
唉,就算是"独目"之人,也能根据"日期"一眼看出它的年月日来,多么怀念易表的函数啊!
SubString(Convert([日期],'System.String'),IIF(SubString(Convert([日期],'System.String'),1,2) Like '*/*',3,4),IIF(SubString(Convert([日期],'System.String'),IIF(SubString(Convert([日期],'System.String'),1,2) Like '*/*',3,4),2) Like '*/*',1,2))
唉,就算是"独目"之人,也能根据"日期"一眼看出它的年月日来,多么怀念易表的函数啊!
[此贴子已经被作者于2008-9-19 13:25:18编辑过]