请教老师,在窗口设置了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()
'加载数据