主题：求指点 自动计算列

 呃，为什么不直接写

Select Case e.DataCol.Name
   
    Case "利息","利息2","利息3"
       
        dr("合计") = dr("利息") + dr("利息2") + dr("利息3")
       
End Select