主题：[求助] 如何用代码求和 行内有空值。（已解决）

直接这样就可以了：

Dim dr As DataRow = e.DataRow
Select Case e.DataCol.name
    Case "第一列","第二列","第三列"

            dr("第五列")=dr("第一列")+dr("第二列")+dr("第三列")

End Select