主题：属性错误，这种一般怎么解决？

属性错误，这种一般怎么解决？一般是什么原因造成的报错？
此主题相关图片如下：微信截图_20191125142304.png

我是卸载datacalchanged里面的，有个列，我直接从文本型修改属性，转为双精度小数了，这个要怎么解除这个报错？

就是以下代码，不知道为啥会报错的。。。。

Dim dr As DataRow = e.DataRow Select Case e.DataCol.name     Case "内部审计年度风险评估调查表_剩余风险_剩余风险分值","内部审计年度风险评估调查表_固有风险_分值","内部审计年度风险评估调查表_控制水平_控制水平系数"        If dr.IsNull("内部审计年度风险评估调查表_固有风险_影响程度") OrElse dr.IsNull("内部审计年度风险评估调查表_固有风险_可能性")             dr("内部审计年度风险评估调查表_剩余风险_剩余风险分值") =Nothing         Else             dr("内部审计年度风险评估调查表_剩余风险_剩余风险分值") = dr("内部审计年度风险评估调查表_固有风险_分值")*dr("内部审计年度风险评估调查表_控制水平_控制水平系数")         End If End Select Select Case e.DataCol.name     Case "内部审计年度风险评估调查表_审计风险关注度_总分"         If dr.IsNull("内部审计年度风险评估调查表_固有风险_影响程度") OrElse dr.IsNull("内部审计年度风险评估调查表_固有风险_可能性")             dr("内部审计年度风险评估调查表_审计风险关注度_总分") =Nothing         Else             dr("内部审计年度风险评估调查表_审计风险关注度_总分") = dr("内部审计年度风险评估调查表_剩余风险_剩余风险分值")+dr("内部审计年度风险评估调查表_内审监督情况_上次审计时间分值")+dr("内部审计年度风险评估调查表_内审监督情况_上次审计结果分值")+dr("内部审计年度风险评估调查表_战略默契度_战略默契度打分")+dr("内部审计年度风险评估调查表_管理层或专业部门需求_分值")         End If End Select

好的，我试试，有些事双精度小数列，一些是整数列，我先试一下

可以了，解决了，是有一列存在文本型列导致的。另外有个问题请教一下：我在执行以下代码的时候，出现了下面这个错误提示，是什么意思？

是表达式列，我是依葫芦画瓢写的一个，搞复杂了。