.NET Framework 版本：2.0.50727.5466
Foxtable 版本：2019.4.12.1
错误所在事件：来货快速录入表,ChangeEdit
详细错误信息：
无法将类型为“Foxtable.DataRow”的对象强制转换为类型“Foxtable.Row”

按帮助中的自定义录入界面之三的做法，偶尔会出现上面的提示，另外一个就是有时候提示在ChangeEdit，有时会在DropDownOpened中

ChangeEdit 事件的代码

Dim psgs As String=Forms("来货录入小窗口").controls("DropBox1").text
If e.Col.Name = "中标号或编号" Then \'如果编辑的是客户ID列
    If e.Col.DroppedDown Then \'如果下拉窗口已经打开
        Dim tbl As Table = Tables("来货快速录入弹出筛选窗口_Table1")
        If e.Text = "" Then \'如果内容为空
            tbl.Filter = "" \'显示所有客户
        Else \'否则根据输入内容进行模糊筛选
            Dim txt As String = "\'%" & e.Text & "%\'"
            \' tbl.Filter = "配送公司=\'"& psgs &"\' And (中标号或编号 Like " & txt & " Or 通用名称 Like " & txt & " Or 规格型号 Like " & txt.replace("*", "[*]")  & "  Or 生产企业 Like " & txt &" Or 简码 Like " & txt & ")"
            Dim mf As String=  "配送公司=\'"& psgs &"\' And (中标号或编号 Like " & txt & " Or 通用名称 Like " & txt & " Or 规格型号 Like " & txt.replace("*", "[*]")  & "  Or 生产企业 Like " & txt &" Or 简码 Like " & txt & ")"
            Dim drs = tbl.DataTable.Select(mf, "计划日期 desc")
            Dim filter As String = "1=2"
            If drs.count >= 5 Then
                For i As Integer = 0 To 4
                    filter &= " or _Identify = " & drs(i)("_Identify")
                Next
            Else
                For Each r As Row In drs
                    filter &= " or _Identify = " & r("_Identify")
                Next
            End If
            tbl.filter = filter
            tbl.sort="计划日期 DESC"
        End If
    End If
End If
If e.Col.Name = "注册证号" Then \'如果编辑的是客户ID列
    If e.Col.DroppedDown Then \'如果下拉窗口已经打开
        Dim tbl As Table = Tables("输入注册证号弹出筛选窗口_Table1")
        If e.Text = "" Then \'如果内容为空
            tbl.Filter = "" \'显示所有客户
        Else \'否则根据输入内容进行模糊筛选
            Dim txt As String = "\'%" & e.Text & "%\'"
            \'tbl.Filter = "注册证号 Like " & txt & "  Or 生产企业 Like " & txt & " Or 名称 Like " & txt & " Or 规格型号 Like " & txt &""
            tbl.Filter = "停用=false and 配送公司=\'" & e.Row("配送公司")& "\' and (名称 Like " & txt & " Or 注册证号 Like " & txt & " Or 生产企业 Like " & txt & ")"
        End If
    End If
End If

For Each r As Row In drs

改成

For Each r As dataRow In drs