vb6.0 中spread数据更新

spread绑定记录集

spread.datasource=记录集

在spread_change事件中，对另一列赋值
spread.setText col+1,row,x后，并不会更新到数据库中，只有手工输入时才会更新到数据库中

请问如何让setText后就立刻更新到数据库中，谢谢

回复 1楼tianyake的帖子

请通过以下方法保存：

1. 
   
2. Private Sub Command1_Click()
   
3.    
   
4. Dim ret As Integer
   
5. 
   
6. With fg
   
7. .SetText 2, .ActiveRow, "Price"
   
8. 
   
9. 
   
10. .DAutoSave = False
    
11. ret = .SetCellDirtyFlag(2, .ActiveRow, True)
    
12. ret = .SetCellDirtyFlag(4, .ActiveRow, True)
    
13. .DataSave
    
14. .DAutoSave = True
    
15. End With
    
16.    
    
17.    
    
18. End Sub
    

复制代码

谢谢，我试试

回复 3楼tianyake的帖子

结果如何？主要是使用 SetCellDirtyFlag 标记。

谢谢,用SetCellDirtyFlag就可以了
SetCellDirtyFlag这个方法我还是不太理解

随便问你一下，你这里为什么要用两条
ret = .SetCellDirtyFlag(2, .ActiveRow, True)
ret = .SetCellDirtyFlag(4, .ActiveRow, True)

回复 5楼tianyake的帖子

当Spread绑定数据时，SetCellDirtyFlag 方法用于标记目标单元格值已经改变，需要更新到数据库中。

ret = .SetCellDirtyFlag(4, .ActiveRow, True)
这句代码没用，可以删除。

回复 6楼iceman的帖子

谢谢

回复 7楼tianyake的帖子

不客气，有问题欢迎开新帖提问。