Dim s As String = e.Form.Controls("TextBox2").Text
    Dim t As WinForm.Table = e.Form.Controls("Table1")
    If s = "" Then
        s = ""
    Else
        s = "%" & s & "%"
        \'tbl.Filter = "item_no Like" & txt
    End If
   
    t.Table.Fill("select {obas_part1}.part_no As 内码编码,{obas_part}.item_no As 料品编码,{obas_part_spec}.cu_part_no As 客户编码,type_name As 料品类别,part_name As 料品名称,part_spec As 料品规格,base_name As 单位,{obas_part_spec}.wf_cp_ggrem As 规格备注,wf_cp_gz As 国家,wf_cp_kr As 客人,wf_bz_fs As 包装方式 From ((({obas_part1} Inner JOIN {obas_part} ON {obas_part1}.[part_no] = {obas_part}.[part_no]) Inner JOIN {obas_part_type} ON {obas_part1}.[part_type] = {obas_part_type}.[type_no]) Inner JOIN {obas_base_code} ON {obas_base_code}.[base_code] = {obas_part1}.[unit_no])  left join {obas_part_spec} on {obas_part1}.[part_no]= {obas_part_spec}.[part_no] Where {obas_base_code}.[code_type] = \'" & 115 & "\' And {obas_part1}.[part_type] Like \'" & 1% & "\'And {obas_part}.item_no = \'" & s & "\'
   Order By {obas_part}.item_no","erp",True)

请问我上面的代码为什么出错?