如果是sqlserver数据库
DataTables("家宽故障回访").LoadFilter = "[回访日期] >= '" & Date.Today & "' and [回访日期] < '" & Date.Today.AddDays(1) & "'" DataTables("家宽故障回访").Load
如果是内部数据源或access
DataTables("家宽故障回访").LoadFilter = "[回访日期] >= #" & Date.Today & "# and [回访日期] < #" & Date.Today.AddDays(1) & "#" DataTables("家宽故障回访").Load