VBA宏 Access自身查询/删除/插入数据库(亲自实践)

最新推荐文章于 2024-06-27 15:50:18 发布

bigheadsheep

最新推荐文章于 2024-06-27 15:50:18 发布

阅读量1.2w

点赞数

分类专栏： VBA宏

本文链接：https://blog.csdn.net/bigheadsheep/article/details/8509132

版权

本文介绍了如何使用VBA宏在Access中直接操作数据库，包括利用CurrentDb.OpenRecordset进行查询，以及通过CurrentDb.Execute进行删除和插入操作。

摘要由CSDN通过智能技术生成

Access自身查询数据库,可以利用 CurrentDb 的方法,其中

1.查询 (select) 利用的是CurrentDb.OpenRecordset(stSql)

    Dim rs As Object
    Dim stSql As String

    '拼写取得TABLE内容的SQL文
    stSql = "SELECT Place FROM [TABLE] "
    '执行SQL文
    Set rs = CurrentDb.OpenRecordset(stSql)

    '如果查询为空,那么退出程序
    If rs.BOF And rs.EOF Then
        MsgBox "Query is NULL, Please check.", vbCritical

    End If
    '结果集返回第一条记录
    rs.MoveFirst
    'PLACE数据有效性check
    For j = 0 To rs.RecordCount - 1
        '确认PLACE内容在查询中
         If place = rs.Fields("Place") Then
            repeatFlg = True
                
            Exit For
        End If

        rs.MoveNext
    Next j

2.删除/插入 (delete/insert) 利用的是CurrentDb.