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

Question

Мой код дает следующую ошибку. Как я могу это исправить?

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

ElseIf Me.chkItem.Checked = True Then 
    Dim CheckNumber As String = "" 
    Dim CheckRef As String = "" 
    dsvoucheritem.Clear() 
    DSVoucher_Expense.Clear() 
    DSVoucher_Check.Clear() 

    Try 
     Me.lstCV.Items.Clear() 
     strDiscount = Nothing 
     rec.Open("select billpaymentcheckline.txnnumber, billpaymentcheckline.txndate" _ 
     & ", billpaymentcheckline.payeeentityreffullname" _ 
     & ", billpaymentcheckline.amount, billitemline.itemlineitemreffullname" _ 
     & ", billitemline.memo" _ 
     & ", billpaymentcheckline.appliedtotxndiscountamount" _ 
     & ", billpaymentcheckline.appliedtotxnrefnumber, billpaymentcheckline.bankaccountreffullname" _ 
     & ", billpaymentcheckline.appliedtotxndiscountaccountreffullname" _ 
     & ", billpaymentcheckline.appliedtotxntxndate, billpaymentcheckline.appliedtotxnamount" _ 
     & ", billpaymentcheckline.refnumber, account.AccountNumber from (billitemline inner join" _ 
     & " billpaymentcheckline on billitemline.refnumber=billpaymentcheckline.appliedtotxnrefnumber) left outer join" _ 
     & " account on billitemline.APAccountreflistid=account.listid where" _ 
     & " billpaymentcheckline.bankaccountreflistid='" &Me.lblBankID.Text & "' and" _ 
     & " billpaymentcheckline.refnumber between '" & CInt(Me.txtRefFR.Text) 
     & "' and '" & CInt(Me.txtRefTO.Text) & "'", con, ADODB.CursorTypeEnum.adOpenForwardOnly, ADODB.LockTypeEnum.adLockReadOnly) 

Answer 1

Он говорит, что не признает один из ваших имен столбцов. Дважды проверьте их все. Вы также можете попробовать удалить поля, пока не найдете виновника.

Answer 2

memo является reserved word в Access SQL.

Попробуйте billitemline.[memo]