主题：[求助]请求代码修改

If e.DataCol.Name = "分类号" OrElse e.DataCol.Name = "年度" OrElse e.DataCol.Name = "期限代码" OrElse

e.DataCol.Name = "件号" Then
    Dim dr As DataRow = e.DataRow
    e.DataRow("档号") = dr("分类号") & "-" & dr("年度")& dr("期限代码")& "-" & dr("件号")
end if