[浏览完整版]
标题：简单问题（求月份）
11楼
ylm 发表于：2008/10/29 21:28:00我也是喜欢之前那种方式.可读性好点.
12楼
don 发表于：2008/10/29 21:49:00以下是引用狐狸爸爸在2008-10-29 21:22:00的发言：
呵呵，那我以简单点：
If e.DataCol.Name = "日期" Then
Dim d As Date = e.NewValue
e.DataRow("月份") = iif(e.NewValue Is Nothing,Nothing, iif(d.day<= 25,d.month,(d.month + 1) mod 12))
End If
不过我还是喜欢之前那种方式，虽然长一点，但是可读性强多了。
呵呵，那我以简单点：
If e.DataCol.Name = "日期" Then
Dim d As Date = e.NewValue
e.DataRow("月份") = iif(e.NewValue Is Nothing,Nothing, iif(d.day<= 25,d.month,(d.month + 1) mod 12))
End If
不过我还是喜欢之前那种方式，虽然长一点，但是可读性强多了。
[此贴子已经被作者于2008-10-29 21:25:33编辑过]
请教这里为何可以是表达式？
iif(e.NewValue Is Nothing,Nothing, iif(d.day<= 25,d.month,(d.month + 1) mod 12))
[此贴子已经被作者于2008-10-29 21:57:41编辑过]
13楼
狐狸爸爸 发表于：2008/10/29 22:07:00以下是引用don在2008-10-29 21:49:00的发言：
请教这里为何可以是表达式？
iif(e.NewValue Is Nothing,Nothing, iif(d.day<= 25,d.month,(d.month + 1) mod 12))
[此贴子已经被作者于2008-10-29 21:57:41编辑过]
这是不是表达式，是代码，代码里头也有iif函数的。
14楼
狐狸爸爸 发表于：2008/10/29 22:10:00不过我从来不用iif函数的，我习惯
if then
else
end if
if then
else
end if
[此贴子已经被作者于2008-10-29 22:26:20编辑过]
15楼
don 发表于：2008/10/29 22:14:00以下是引用狐狸爸爸在2008-10-29 22:07:00的发言：
这是不是表达式，是代码，代码里头也有iif函数的。
多谢指点．