主题：[求助]如何DATATABLE的数据被清除时在录入窗口进行更新

 刷新一下记录窗口即可

 http://www.foxtable.com/help/topics/2722.htm

 去掉之前的代码，在validateEdit加入代码

If e.col.name = "内径" Then
    Dim cr As Row = e.Row
    If cr.Isnull("内径")  Then
        Return
    Else
        If val(cr("内径")) > val(3.43) OrElse val(cr("内径")) < val(3.4) Then
            MessageBox.Show("当前数值超出了管理范围,确定要输入?","确认",MessageBoxButtons.OK)
            e.cancel = True
        End If
    End If
End If
If e.Col.name = "内毛刺" Then
    Dim cr As Row = e.Row
    If cr.Isnull("内毛刺")  Then
        Return
    Else
        If val(cr("内毛刺")) > val(0.1) Then
            MessageBox.Show("当前数值超出了管理范围,确定要输入?","确认",MessageBoxButtons.OK)
            e.cancel = True
        End If
    End If
End If
If e.Col.name = "外径A" Then
    Dim cr As Row = e.Row
    If cr.Isnull("外径A")  Then
        Return
    Else
        If val(cr("外径A")) > val(5.95) OrElse val(cr("外径A")) < val(5.9) Then
            MessageBox.Show("当前数值超出了管理范围,请确认?","警告",MessageBoxButtons.OK)
            e.cancel = True
        End If
    End If
End If

If Forms("窗口1").Opened Then
    Forms("窗口1").Controls("RecordGrid1").refresh
End If