试试直接执行 foxtable.exe 而不是执行 你程序名.exe

然后，修复一下wmi

试试，是否这个问题

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=95878&skin=0

此主题相关图片如下：提示.png

这是一个下拉窗口，为什么有些记录就可以，有些记录会出错

DropDownClosed

下拉窗口关闭后执行。
可以在这里对下拉窗口进行设置。

If e.Selected Then \'如果选择了值
    Dim tbl As Table = Tables("下拉物料_Table1")
    If tbl.Current IsNot Nothing Then
        If Tables("DD生产订单表.DD生产订单明细表").Current IsNot Nothing
            Tables("DD生产订单表.DD生产订单明细表").Current("报价ID") = tbl.Current("报价ID")
            e.Form.DropDownBox.Value = tbl.Current("物料名称")
        End If
    End If
    e.Form.DropDownBox.CloseDropDown()
End If

不是这个事件的问题。你设置filter的代码要改一下

Tables("").filter = "第一列 like \'" & 变量 & "\'"

要改成

Tables("").filter = "第一列 like \'" & 变量.Replace("*", "[*]") & "\'"

DropDownOpened

展开下拉窗口后执行。
可以在这里对下拉窗口进行设置。

Dim txt As String = e.Form.DropDownBox.Text
Dim t As Table = Tables("下拉物料_Table1")
If txt = "" Then
    t.Filter = ""
Else
    Dim f As String  = "\'%" & txt & "%\'"
    t.Filter = "物料名称 Like " & f & " Or 旧编码 Like " & f & "Or 色号 Like " & f &" Or 工艺代码 Like " & f &" Or 客户 Like " & f &" Or 客户名称 Like " & f &" Or 系列名称 Like " & f
End If
e.Form.DropDownBox.Select() \'将输入焦点返回下拉列表框