在帮助文件里面关于工作流的一章，“数据的自动流转之一”，对于下面红色加粗的部分不太理解，then 后面什么代码也没有啊，问什么能阻止2A变成1B？请大家帮助，多谢了！
7、进度列的值需要根据其他列的输入进度来计算得出，为此将表的DataColChanged事件代码设置为：
Select
Case e.DataCol.Name
Case
"第一列","第二列","第三列","第四列","第五列","第六列"
Dim dr As
DataRow = e.DataRow
Dim jd As
String = "1A"
If
dr.IsNull("第一列") =
False
AndAlso dr.IsNull("第二列") = False
Then
jd = "1B"
If dr.IsNull("第三列") =
False
AndAlso dr.IsNull("第四列") = False
Then
jd = "2B"
If dr.IsNull("第五列") = False
AndAlso dr.IsNull("第六列") = False
Then
jd = "3B"
End
If
End
If
End
If
If jd = "1B"
AndAlso dr("进度") = "2A"
Then
'注意这里的处理技巧，意思是2A不能回到1B，3A不能回到2B
ElseIf jd = "2B"
AndAlso dr("进度") = "3A"
Then
Else
dr("进度") = jd
End
If
End
Select
加好友 
发短信
Post By：2013/7/17 20:21:00 [只看该作者]
