datacolchanged事件
If e.DataCol.name = "第一列" Then If e.NewValue = Nothing Then e.DataRow("第二列") = 0 Else e.DataRow("第二列") = e.newvalue.split("\").length End IfEnd If