主题：错在哪了？

编译通不过，为什么？

Select  Case e.DataCol.Name
    Case  "师德师风_思想修养_考核分"
        If e.Row("直接评优_结论")="是" Or e.Row("一piao否决_结论")="是"  Then
            e.text ="-"
            'L列的计算代码
        End If
    End  Select

是不是和e参数没有关系，黑色部分没有问题呀。把黑色的代码换成兰色的代码也是不行。我是放在Click事件中。

Select  Case e.DataCol.Name
    Case  "师德师风_思想修养_考核分"
        If e.Row("直接评优_结论")="是" Or e.Row("一piao否决_结论")="是"  Then
            e.text ="-"
            'L列的计算代码

  End If

'If Forms("考核评优").Opened = False Then Forms("考核评优").Open
'Forms("考核评优").Controls("TextBox1").text = e.Row(e.Col.Name)