数据不能显示在Datagrid里

Question

按command2添加记录到数据后，在重新连接一次数据。即可！

Answer 1

rs.Open str, conn, adOpenStatic, adLockReadOnly
Set DataGrid1.DataSource = rs
rs.Open "select * from 运送员工信息", conn, adOpenStatic, adLockReadOnly
Set DataGrid1.DataSource = rs
将改为：rs.Open str, conn, adOpenDynamic, adLockPessimistic
Set DataGrid1.DataSource = rs
rs.Open "select * from 运送员工信息", conn, adOpenDynamic, adLockPessimisticSet DataGrid1.DataSource = rs