主题：[求助]动态加载错误，求教

“收费明细”表，“门诊退费”窗口，“加载当前编号”按钮代码

目前代码：

Dim val As String = e.form.Controls("TextBox1").Value
If val Is Nothing Then
    MsgBox("填写编号!",64,"提示")
    Return
End If
If val.Length <> 6 Then
    MsgBox("编号错误!",64,"提示")
    Return
End If
If val IsNot Nothing Then
    DataTables("SFMX").LoadFilter = "BH = '"& val &"'"
    DataTables("SFMX").Load()
End If

.NET Framework 版本：2.0.50727.42
Foxtable 版本：2012.11.28.1
错误所在事件：
详细错误信息：
System.Data.OleDb.OleDbException: 至少一个参数没有被指定值。
   在 System.Data.OleDb.OleDbCommand.ExecuteCommandTextForSingleResult(tagDBPARAMS dbParams, Object& executeResult)
   在 System.Data.OleDb.OleDbCommand.ExecuteCommandText(Object& executeResult)
   在 System.Data.OleDb.OleDbCommand.ExecuteCommand(CommandBehavior behavior, Object& executeResult)
   在 System.Data.OleDb.OleDbCommand.ExecuteReaderInternal(CommandBehavior behavior, String method)
   在 System.Data.OleDb.OleDbCommand.ExecuteReader(CommandBehavior behavior)
   在 System.Data.OleDb.OleDbCommand.System.Data.IDbCommand.ExecuteReader(CommandBehavior behavior)
   在 System.Data.Common.DbDataAdapter.FillInternal(DataSet dataset, DataTable[] datatables, Int32 startRecord, Int32 maxRecords, String srcTable, IDbCommand command, CommandBehavior behavior)
   在 System.Data.Common.DbDataAdapter.Fill(DataTable[] dataTables, Int32 startRecord, Int32 maxRecords, IDbCommand command, CommandBehavior behavior)
   在 System.Data.Common.DbDataAdapter.Fill(DataTable dataTable)
   在 Foxtable.DataTable.Load(Boolean OO000l1l)

报错如上

按“姓名、日期”等加载时可以。

编号列为表达式列

估计是编号列属性问题