主题：[求助]换成按钮代码

DataColChanged 可以生效，做按钮代码不行

If e.DataCol.Name = "序号" Then

    Dim fdr As DataRow = DataTables("财政").find("乡镇= '" & e.DataRow("乡镇") & "' and 村名= '" & e.DataRow("村名") & "'and 组别= '" & e.DataRow("组别") & "'and 姓名 = '" & e.DataRow("户名") & "'")

    If fdr IsNot Nothing Then

        e.DataRow("序号")=fdr("序号")

    End If

End If