forms("ERP界面").controls("历史进店记录Table3").Visible = True
forms("ERP界面").controls("历史进店记录Table3").TopMost = True
Dim d1 As Date = Forms("ERP界面").Controls("历史进店记录DateTimePicker9").value
Dim t1 As Integer = Forms("ERP界面").Controls("历史进店记录TextBox1").value
Dim t3 As Integer = Forms("ERP界面").Controls("历史进店记录TextBox3").value
Tables("历史进店记录_历史进店记录Table3").fill("
Select DISTINCT 进店时间,公里数,底盘号 FROM {历史进店记录} where 进店时间 >= '" & d1.AddDays(-t3) & "' And 进店时间 '" & d1.AddDays(-t1) & "' ","华泰内控系统-ERP",False)
Tables("历史进店记录_历史进店记录Table3").Visible = True
用select * from 不会出问题,但是后面where说语法错误
此主题相关图片如下:1.jpg
一旦使用 select 底盘号等等等 选择部分列填充的时候就会出现
此主题相关图片如下:2.jpg
求解这2个错误,表的主界面为
此主题相关图片如下:33.jpg