burada ne yanlış anlayamadım
Dim SqlSirala, txtSira As String
SqlSirala = " SELECT odeme.Kradsoyad, odeme.KrTc, odeme.Kvadsoyad, odeme.KvTc, odeme.odmTrh, odeme.KrTcOdmTrh, odeme.kimde, " & _
" FROM odeme " & _
" WHERE ((([tarih] Between " & Me.Metin79 & " And " & Me.Metin82 & "));"
Me.Liste5.RowSource = SqlSirala
