Question

vb中datagrid显示的数据可以直接改动，添加的数据不保存就直接在呢，该怎么解决？

Answer 1

可以在 程序的最后加上

Adodc1.Recordset.AddNew
Adodc1.Refresh

也就是
Private Sub 增加_Click()
DataGrid1.Enabled = True
Adodc1.Recordset.AddNew
End Sub
Private Sub 保存_Click()
a = MsgBox("确实要增加当前的记录吗？", vbYesNo)
If a = vbYes Then
Adodc1.Recordset.Update
Adodc1.Recordset.AddNew
Adodc1.Refresh

Else
Exit Sub
End If
End Sub

Answer 2

还是需要在改动时或者程序退出时添加保存代码

追问

Private Sub 增加_Click()
DataGrid1.Enabled = True
Adodc1.Recordset.AddNew
End Sub
Private Sub 保存_Click()
a = MsgBox("确实要增加当前的记录吗？", vbYesNo)
If a = vbYes Then
Adodc1.Recordset.Update
Else
Exit Sub
End If
End Sub
可以添加上，但保存的时候,点否的时候，还是会显示添加的数据，但是数据库没有添加