VB打开当前下数据库进行添加 删除 查询 等操作 详细代码及部骤说明. 在这里先谢谢了

来源：百度知道 编辑：UC知道 时间：2024/06/11 12:49:00

Private Sub Command1_Click()
Dim rSel As Long
With MSFlexGrid1
If .Rows = 0 Or .RowSel = 0 Then Exit Sub
rSel = .RowSel
If rSel <> .Rows - 1 Then

For i = rSel + 1 To .Rows - 1
For j = 1 To .Cols - 1
.TextMatrix(i - 1, j) = .TextMatrix(i, j)
Next
Next

End If

.Rows = .Rows - 1
End With
End Sub

是什么数据库? Access?

SQL?