主题：[求助]帮忙看个错误

在项目表中的currentchanged事件中代码：

Dim t As Table = Tables("生产进度管理_生产进度表")
Dim s As String
With e.Table
    If .Current Is Nothing Then
        t.DataTable.LoadFilter = "False"
    Else
        s = "select * from {零件表} where 项目编号 = "
        s = s & "'" & .Current("项目编号") & "'"
        t.Fill(s,"atwdb",False)
    End If
End With

 

如果Tables("生产进度管理_生产进度表")中有一列是下拉列，在下拉窗口关闭后但是未退出编辑的情况下，我直接点击项目表中的行时，报错了：

 

此主题相关图片如下：qq截图20130706111825.gif

用 sqlload 就没这个问题了，fill就不行