Я пытаюсь создать поиск по диапазону дат в VB.NET и госпожа Аксес

---

Я совершенно новичок в программировании и люблю изучать новые вещи, особенно код. Не могли бы вы помочь мне решить эту проблему?
Я пытаюсь создать поиск по диапазону дат, но когда я пытаюсь выполнить поиск с 1/6/2016 по 2/2/2017 в моем Datagridview появилась дата 2018 года.
В моей БД мой тип данных DATE_OF_PAYMENT-это Дата/Время и формат (короткая дата) 11/12/2015.
Не могли бы вы показать мне правильный код для этого? Я потратил 8 часов на поиски решения, но все равно потерпел неудачу.

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    con.Open()
    Dim ds As New DataSet
    Dim dt As New DataTable
    ds.Tables.Add(dt)
    Dim da As New OleDbDataAdapter
    da = New OleDbDataAdapter("select * from VOUCHER", con)

    da = New OleDbDataAdapter(" Select * from VOUCHER WHERE DATE_OF_PAYMENT between '" + DateTimePicker1.Value + "' and '" + DateTimePicker2.Value + "'", con)
    'da = New OleDbDataAdapter(" Select * from VOUCHER WHERE DATE_OF_PAYMENT >='" & TextBox2.Text & "' AND DATE_OF_PAYMENT <='" & TextBox3.Text & "'", con)



    da.Fill(dt)
    DataGridView1.DataSource = dt.DefaultView
        con.Close()

End Sub

Что я уже пробовал:

Я попробовал этот код, но никакого отображения в datagridview

<pre lang="vb">
Dim str As String
str = "SELECT * FROM VOUCHER WHERE DATE_OF_PAYMENT  = " + DateTimePicker1.Value + " and " + DateTimePicker2.Value
        da = New OleDbDataAdapter(str, con)

---