http://www.foxtable.com/help/topics/1469.htm
Select Case e.DataCol.Name
Case "列1","列2","列3"
If e.DataRow.IsNull("列1") = False AndAlso e.DataRow.IsNull("列2") AndAlso e.DataRow.IsNull("列3") Then
e.DataRow("排序") = 1
End If
If e.DataRow.IsNull("列1") = False AndAlso e.DataRow.IsNull("列3") = False AndAlso e.DataRow.IsNull("列2") Then
e.DataRow("排序") = 2
End If
If e.DataRow.IsNull("列2") = False AndAlso e.DataRow.IsNull("列3") = False AndAlso e.DataRow.IsNull("ATA")= False Then
e.DataRow("排序") = 3
End If
If e.DataRow.IsNull("列1") AndAlso e.DataRow.IsNull("列2") AndAlso e.DataRow.IsNull("列3") Then
e.DataRow("排序") = 4
End If
End Select
[此贴子已经被作者于2015/8/25 16:28:15编辑过]