If e.DataRow("gysh") = "汪春阶" Or e.DataRow("gysh") = "管炳芳" Or e.DataRow("gysh") = "王逢礼" Or e.DataRow("gysh") = "陈柏安" Or e.DataRow("gysh") = "陈春桥" Or e.DataRow("gysh") = "叶景辉" Or e.DataRow("gysh") = "赵友玲" Then e.DataRow("rkshl") = e.DataRow("grshl") End If
If e.DataRow("gysh") In ("汪春阶","管炳芳","王逢礼","陈柏安","陈春桥","赵友玲","叶景辉","李三","赖红平") Then e.DataRow("rkshl") = e.DataRow("grshl") End If