主题：请帮助解决？列的计算问题。

Dim Z As DataRow = e.DataRow

Select Case e.DataCol.Name
        Case  "1列","2列","3列"           

            Z("5列") = Z("1列") + Z("2列") + Z("3列") 
End Select

Select Case e.DataCol.Name
        Case "3列","4列"

            Z("6列") = Z("3列") + Z("4列")

End Select