主题：运行错误

Dim Filter As String
Dim ymd1 As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker1")
If ymd1 IsNot Nothing Then
    If Filter > "" Then
        Filter = Filter & " And "
    End If
    Filter = Filter & "{任务单}.计划完成日期 <= #" & ymd1.value & "# "
End If
If Filter > "" Then
    Tables("待加工查询_Table1").Filter = Filter
End If

.NET Framework 版本：4.0.30319.1
Foxtable 版本：2024.11.1.1
错误所在事件：
详细错误信息：
Cannot interpret token '{' at position 1.