主题：数据库导入数据显示不全

Dim q As new QueryBuilder

q.TableName = "门禁记录"

q.TableCaption = "门禁记录"

q.C

q.SelectString = "Select SerialId,CardId as 员工卡号,RecDate as 日期,RecTime as 时间,EquNo as 门禁编号, Event as 操作方式 From DrRecord"

q.Build

Tables("门禁记录").Filter = "日期 = '2013-08-01'"

我将部分列导入数据库后发现显示的数据不全，某一行还有感叹号，提示“修改了只读数据”，请问这是什么情况，而且选取的列越少，显示的行数也越少，