参考帮助文件中的
用Table控件模拟关联表的程序例子,改写了如下程序,
想在打开窗口后,Tables("发货确认_Table1")中显示订单=当前订单号,且发运列=False或发运列为空的订单。
Dim t As Table = Tables("发货确认_Table1")
With Tables("订单跟踪")
If .Current Is Nothing Then
t.Filter = "False"
Else
' t.Filter =" 订单号 = '" & .Current("订单号")&"'"
t.Filter =" 订单号 = '" & .Current("订单号")&"'" And " 发运 = False Or 发运 Is Null"
End If
End With
但是,仅显示“订单=当前订单号”就能正常运行,加上And " 发运 = False Or 发运 Is Null",就提示出错:
从字符串“订单号=‘D2012101501’”到类型“Long”的转换无效。--->输入字符串的格式不正确。
该如果修改?
请指教~
[此贴子已经被作者于2012-11-12 22:04:23编辑过]