Microsoft Access — популярная система управления реляционными базами данных, которая позволяет пользователям хранить данные, управлять ими и манипулировать ими. Одной из мощных функций Access является его интеграция с Visual Basic для приложений (VBA), который предоставляет программный интерфейс для автоматизации задач и расширения функциональности Access. В этой статье мы рассмотрим различные методы добавления новых записей в базу данных MS Access с помощью VBA, а также приведем примеры кода.

Метод 1: использование оператора SQL INSERT
Инструкция SQL INSERT позволяет добавлять новые записи в таблицу. Вот пример использования его в VBA:

Dim strSQL As String
strSQL = "INSERT INTO TableName (Field1, Field2) VALUES ('Value1', 'Value2')"
CurrentDb.Execute strSQL

Замените «TableName» именем вашей таблицы, а «Field1» и «Field2» фактическими именами полей. Обновите «Значение1» и «Значение2», указав значения, которые вы хотите вставить.

Метод 2: использование объекта Recordset
Объект Recordset в VBA предоставляет гибкий способ добавления новых записей. Вот пример:

Dim rs As Recordset
Set rs = CurrentDb.OpenRecordset("TableName", dbOpenDynaset)
rs.AddNew
rs("Field1") = "Value1"
rs("Field2") = "Value2"
rs.Update
rs.Close

Замените «TableName» на имя вашей таблицы и установите значения для «Field1» и «Field2» в соответствии с вашими требованиями.

Метод 3: использование DAO.Recordset
Библиотека DAO (объекты доступа к данным) в VBA предоставляет еще один способ добавления записей. Вот пример:

Dim db As DAO.Database
Dim rs As DAO.Recordset
Set db = CurrentDb
Set rs = db.OpenRecordset("TableName", dbOpenDynaset)
rs.AddNew
rs("Field1").Value = "Value1"
rs("Field2").Value = "Value2"
rs.Update
rs.Close
Set rs = Nothing
Set db = Nothing

Замените «TableName» на имя вашей таблицы и обновите значения «Field1» и «Field2» соответственно.

В этой статье мы рассмотрели три различных метода добавления новых записей в MS Access с помощью VBA. Используя оператор SQL INSERT, объект Recordset и DAO.Recordset, вы можете выбрать метод, который лучше всего соответствует вашим потребностям. Не забудьте адаптировать примеры кода в соответствии с именами таблиц и полей и соответствующим образом скорректировать значения. С помощью этих методов вы можете эффективно управлять данными в базе данных MS Access и манипулировать ими.