主题：[求助]RaiseDataColChanged刷新时报错

1、你这个代码 DataTables("客户管理").DataCols("客户编号").RaiseDataColChanged(pr) 触发的是客户编号的重置列，并不会执行你贴出来的1楼的代码。

2、你1楼的代码编写没有问题。

3、报什么错？具体图片贴出来。

你datacolchanged肯定有其他代码

http://www.foxtable.com/webhelp/scr/1485.htm

看红色代码

If dr28.IsNull("进店视力左眼") = False  OrElse Dr28.IsNull("最近测视左眼") = False Then
    Dim jdzy() As String = e.DataRow("进店视力左眼").Split(" ")
    Dim zjzy() As String = e.DataRow("最近测视左眼").Split(" ")
    If jdzy.length >= 2 AndAlso zjzy.length >= 2 Then
        Dim dr11 As DataRow = DataTables("新旧视力对照表").Find("小数记录法 = '" & jdzy(1) & "'") ' 进店左眼Dr11
        Dim dr14 As DataRow = DataTables("新旧视力对照表").Find("小数记录法 = '" & zjzy(1) & "'") ' 最近左眼dr14
        If dr14 IsNot Nothing  AndAlso dr11 IsNot Nothing  Then
            dr28("左眼提升幅度") = (Val(dr14("五分记录法")) - Val(dr11("五分记录法")))/Val(dr11("五分记录法"))
        End If
    End If
End If