Вставьте каждую запись даты за текущий месяц в таблицу доступа, используя VBA

Я новичок в программировании VBA. Я разработал одну форму, в которой есть кнопка. После нажатия этой кнопки я хочу вставить запись в мою таблицу с одним столбцом даты. Количество фиктивных записей должно быть равно количеству дней в текущем месяце. Если месяц - май 2016 года, то запись будет вставлена ​​с датой 05.01.2016, 05.02.2016 ....... 31.05.2016, например.

Заранее спасибо.

Private Sub Command0_Click()
    Dim strQuery As String
    Dim currDateTime As Date
    currDateTime = Now()
    strQuery = "INSERT INTO tbl_ShipOrders (IDate ) VALUES (" & currDateTime & " )"
    CurrentDb.Execute (strQuery)
End Sub

Ответы на вопрос(4)

Ваш ответ на вопрос