'百十和,取最后1位
If e.DataCol.Name = "第一列" Or e.DataCol.Name = "第二列" Or e.DataCol.Name = "第三列" Or e.DataCol.Name = "第四列" Then '如果更改的是十位列
If e.DataRow.IsNull("第一列") Or e.DataRow.IsNull("第二列") Or e.DataRow.IsNull("第三列") Or e.DataRow.IsNull("第四列") Then '十位是否为空
e.DataRow("第五列") = Nothing
e.DataRow("第六列") = Nothing
e.DataRow("第七列") = Nothing
e.DataRow("第八列") = Nothing
ElseIf e.DataRow.IsNull("第一列") = False And e.DataRow.IsNull("第二列") = False And e.DataRow.IsNull("第三列") = False And e.DataRow.IsNull("第四列") = False Then '十位是否为空
Dim vs(3) As Integer
vs(0) = e.DataRow("第一列").
vs(1) = e.DataRow("第二列")
vs(2) = e.DataRow("第三列")
vs(3) = e.DataRow("第四列")
Array.Sort(vs)
'e.DataRow("第五列") = vs(0)
e.DataRow("第六列") = vs(1)
e.DataRow("第七列") = vs(2)
'e.DataRow("第八列") = vs(3)
End If
End If
蓝总,上面代码报错如下;
.NET Framework 版本:4.0.30319.42000
Foxtable 版本:2022.1.30.2
错误所在事件:表,表A,DataColChanged
详细错误信息:
调用的目标发生了异常。
未找到类型“Integer”的公共成员“vs”。
求助修复