主题：请教!

datacolchanged事件

Select Case e.DataCol.name
    Case "来源类别", "凭证编号", "安排类别"
        If e.DataRow.isnull("来源类别") OrElse e.DataRow.isnull("凭证编号") Then
            e.DataRow("项目编号")  = Nothing
        Else
            If e.DataRow("安排类别") = "未立项资金" Then
                e.DataRow("项目编号") = "未立项-" & e.DataRow("凭证编号")
            End If
        End If
End Select