我使用ADODC、DATAGRID控件操作ACCESS数据库。
DATAGRID1与ADODC1在属性中已经绑定。代码如下:Private Sub Form_Load()
Adodc1.RecordSource = "select * from 合同基本信息表"
Adodc1.Refresh ’datagrid1显示数据
end subPrivate Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
conNumber = Adodc1.Recordset.Fields("合同号")
Adodc1.RecordSource = "select * from 合同基本信息表 where 合同号='" & conNumber & "'"
Adodc1.Refresh
DataGrid1.Refresh
end sub此时可以在DATAGRID1单元格中修改数据,但鼠标移开,在其它单元格中单击,修改后的数据又变回原来的数据.
若不在其它单元格单击,修改完数据,直接关闭窗体,则修改后的数据能保存在数据库中。
每条记录中,我都有多个数据要修改,所以请高手帮忙!新手致谢!
DATAGRID1与ADODC1在属性中已经绑定。代码如下:Private Sub Form_Load()
Adodc1.RecordSource = "select * from 合同基本信息表"
Adodc1.Refresh ’datagrid1显示数据
end subPrivate Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
conNumber = Adodc1.Recordset.Fields("合同号")
Adodc1.RecordSource = "select * from 合同基本信息表 where 合同号='" & conNumber & "'"
Adodc1.Refresh
DataGrid1.Refresh
end sub此时可以在DATAGRID1单元格中修改数据,但鼠标移开,在其它单元格中单击,修改后的数据又变回原来的数据.
若不在其它单元格单击,修改完数据,直接关闭窗体,则修改后的数据能保存在数据库中。
每条记录中,我都有多个数据要修改,所以请高手帮忙!新手致谢!
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货