主题：错误提示

此主题相关图片如下：qq截图20150522115257.png

    If e.F orm.Controls("fa piao号").Text.Chars(4) ="1"  Then
       e.F orm.controls("Table1").Table.Fill("Select  学期,班级,学生姓名,b.fa piao号,'' As 缴费项目,退费金额,退费原因 F rom {学费信息} a Inner JOIN {退费信息} b ON b.fa piao号 = a.fa piao号 where b.fa piao号 = '" & e.Form.Controls("fa piao号").Text & "'","数据库", True)
       Tables("退费信息_Table1").Current("缴费项目") = "学费" 
    End If

关闭错误提示，求代码？谢谢