VIP会员
购物车
私信
发表新帖
立即签到
关注
回复
支持(
反对( 首页上一页 1 下一页尾页 1 条记录 1/1页
删除datagrid控件中数据，更新数据延迟问题
发表在VB答疑区
2007-06-06
是否精华
是
否
版块置顶:
是
否
我的想法是删除datagrid控件中的数据,结果点删除按钮,没反映,但是重新启动窗体,这时数据删除了.应该是数据更新问题.但是我不知道错出在什么地方.请高手帮帮我啊,小弟先在此谢谢了!
我的代码是如下:
Private Sub Command4_Click()
Dim a As String
rs1.Open "select * from 员工信息", Conn, adOpenKeyset, adLockOptimistic
If Adodc1.Recordset.RecordCount > 0 Then
a = MsgBox("您确实要删除这条数据吗?", vbYesNo)
If a = vbYes Then
Adodc1.Recordset.Delete
Adodc1.Recordset.Update
Adodc1.Refresh
End If
rs1.Close
Else
MsgBox ("没有要删除的数据!")
End If
End Sub
我的代码是如下:
Private Sub Command4_Click()
Dim a As String
rs1.Open "select * from 员工信息", Conn, adOpenKeyset, adLockOptimistic
If Adodc1.Recordset.RecordCount > 0 Then
a = MsgBox("您确实要删除这条数据吗?", vbYesNo)
If a = vbYes Then
Adodc1.Recordset.Delete
Adodc1.Recordset.Update
Adodc1.Refresh
End If
rs1.Close
Else
MsgBox ("没有要删除的数据!")
End If
End Sub
分享到：
