主题：命令窗口执行正确，到窗口就执行错误~~

这句代码在命令窗口执行正确，到窗口就执行错误~~
此主题相关图片如下：qq图片20151107093201.png

Dim rq As WinForm.DateTimePicker = e.Form.Controls("开始日期")
rq.value = Date.Today()

Dim dt As String
'dt = ("[开始] >= #2015-11-05# And [完成] <= #2015-11-05#")
'dt = ("[开始] >= #" & rp.Value & "#" & " And [完成] <= #" & rp.Value & "#")
'MessageBox.Show(dt)
If rq.value IsNot Nothing Then
    If dt >"" Then
        Tables("进度计划表").Filter = "[开始] <= #" & rp.value & "#" & " And [完成] >= # " & rp.value & "#"
    End If
End If