VB6使用datagrid映射过来的数据无法保存！！！求解

2016-09-14 11:28:09 511 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

vb.net中自动调整datagrid中的列宽问题：在软件开发中，利用datagrid 显示结果集dataset中表的记录，发现不能根据值的长度动态调整列宽解决过程：通过csdn论坛讨论和搜索相关的帖子，总结了部分前人的经验。实现过程：方法介绍：一设置dbgrid样式表在调整显示列宽之前要给datagrid添加表的样式，即DataGridTableStyle，如下方法参数dataGridPara 为DataGrid实例，strtableN 阅读详情

自制软件，功能有待完善，现在碰到个问题，快烦死人了：
DataGrid控件绑定了Adodb连接的数据库，数据显示啥都没问题，然后又调用了另一个数据库，表中字段都对应好了，也能把数据复制过来，但是DataGrid就是不保存数据，删除也提示“无法为更新行定位……”，为什么在DataGrid中手动输入的就会自动保存啊，映射过来的就不行！

第一个删除有问题，第二个就没问题！
代码：
For i = 1 To frmexchange.List5.ListCount
c(i) = frmexchange.List5.List(i - 1)
d(i) = frmexchange.List6.List(i - 1)
Next
con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "/TransDataDB.mdb" & ";Persist Security Info=False"
rec2.Open "OutputData", con, adOpenKeyset, adLockOptimistic

For i = 1 To frmexchange.List5.ListCount
rec2.AddNew
rec2.Fields(c(i)) = rs1.Fields(d(i))
rec2.MoveNext
End If
Next
Set con = Nothing
Set rec2 = Nothing

...全文