如题，当我在查询表的加载树点击“加载所有行”时会出现下面的红色错误提示：

.NET Framework 版本：2.0.50727.3655
Foxtable 版本：2014.11.11.1
错误所在事件：产品系列设置,BeforeLoad
详细错误信息：
从字符串“{obas_part1}.part_attr = \'1\' and”到类型“Long”的转换无效。
输入字符串的格式不正确。

BeforeLoad 代码如下，不知如何做才不会有错误？

Dim fl As String = "{obas_part1}.part_attr = \'1\' and {obas_part}.act_sw = \'1\' and obas_base_code.code_type = \'115\'"
Dim f2 As  String = "{obas_part1}.part_attr = \'2\' and {obas_part}.act_sw = \'1\' and obas_base_code.code_type = \'115\'"
Dim f3 As String = fl & f2
If e.DataTable.LoadFilter = "" Then
    e.DataTable.LoadFilter = fl Or f2
ElseIf e.DataTable.LoadFilter.IndexOf(f3) < 0 Then \'如果没有包括条件
    e.DataTable.LoadFilter =e.DataTable.Loadfilter & " And " & fl & " Or " & e.DataTable.Loadfilter & " And " & f2
End If

 你这个是查询表？你这个是全局事件？

 试试不要用单引号。

是查询表，上面的代码是在表的事件BeforeLoad

试过不用单引号也一样出错！

 看查询表的sql语句是什么，贴出来看看。

 要不，就做个例子发上来

将代码变为如下所示，特别是红色字的就正常了，谢谢各位！

Dim f1 As String = "{obas_part1}.part_attr = \'1\' and {obas_part}.act_sw = \'1\' and {obas_base_code}.code_type = \'115\'"
Dim f2 As  String = "{obas_part1}.part_attr = \'2\' and {obas_part}.act_sw = \'1\' and {obas_base_code}.code_type = \'115\'"
Dim f3 As String = f1 & f2
If e.DataTable.LoadFilter = "" Then
    e.DataTable.LoadFilter = f1 & "Or" & f2
ElseIf e.DataTable.LoadFilter.IndexOf(f3) < 0 Then \'如果没有包括条件
    e.DataTable.LoadFilter =e.DataTable.Loadfilter & " And " & f1 & " Or " & e.DataTable.Loadfilter & " And " & f2
End If