主题：年份数据加载问题

请教老师，在窗口设置了ComboBox1，想通过ComboBox1下拉窗口选择2010或2013加载某年的数据，

窗口表是SQLQuery的设置

Dim y As Integer = 2011 '指定年份（这个部分如何转换字符）
Dim dt1 As New Date(y, 1, 1)
Dim dt2 As New Date(y, 12, 31)
Dim Filter As String
Filter = "日期 >= #" & dt1 & "# And 日期 <= #" & dt2 & "#"

DataTables("窗口1_Table1").LoadFilter = Filter '设置加载条件

DataTables("窗口1_Table1").Load() '加载数据