[求助]数据更新时一个奇怪的问题
我的一个删除按钮，每次按下删除一个DATAGRID中选中的数据，代码都写好了，但是直接运行，DATAGRID还是原来数据没有更新，我设了断点找错误，可是一设断点，运行起来又更新了，谁能告诉我为什么啊，更新代码都写好了的，为什么会出现这种情况？Private Sub Command3_Click()
If (DataGrid1.Row = -1) Then
MsgBox "请选择要查看的学生"
Else
Dim mrc As ADODB.Recordset
Set mrc = New ADODB.Recordset
selrow = DataGrid1.Row
mrc.Open sqlstr, "provider=Microsoft.Jet.OLEDB.4.0;Data source =" & App.Path & "/database/db1.mdb;Jet OLEDB:Database Password=7886475", adOpenStatic, adLockOptimistic
mrc.Move selrow
mrc.Delete
mrc.Update
datagridset
End If
End Sub
Private Function datagridset()
Adodc1.RecordSource = sqlstr
Set DataGrid1.DataSource = Adodc1
Adodc1.Refresh
End Function
我得代码是这样的
我想不通的就是为什么设置断点检查时就是正确的
设断点应该不会影响代码啊
