Нет результатов в наборе рекордов

У меня есть временная таблица, созданная из запроса. Из этой таблицы я выбираю элементы и размещаю их в определенном порядке для отображения в списке. Все отлично работает, пока я не попытаюсь добавить предложение where в свой оператор select.

Что я хотел бы сделать, так это, когда я запускаю запрос, который не работает ниже, просто возвращайте переменные как «0».

Я попытался сделать оператор if, который просто делает мою переменную «0», но я все равно получаю ту же ошибку «Нет текущей записи».

Приведенный ниже запрос работает нормально;

  strQuery = "SELECT * FROM " & currentTime & " Order By CVT, CVY, CVW, 
  AdjusterName"

Но когда я добавляю предложение where <= 1, я получаю сообщение об ошибке «Нет текущей записи». Второй запрос;

  strQuery = "SELECT * FROM " & currentTime & " WHERE CVT <=1 Order By 
  CVT, CVY, CVW, AdjusterName"

Когда я запускаю этот второй запрос, я получаю ошибку «Нет текущей записи». Здесь я бы хотел, чтобы вместо этого отображался ноль.

На всякий случай, вот вся функция;

    If ClaimTypeCB = "MO" Then
        strQuery = "SELECT * FROM " & currentTime & " WHERE CVT <=1 Order 
        By CVT, CVY, CVW, AdjusterName"
    Else
        strQuery = "SELECT * FROM " & currentTime & " Order By CVT, CVY, 
        CVW, AdjusterName"
    End If
        Set daoQueryResult = db.OpenRecordset(strQuery)

        daoQueryResult.MoveLast
        intRecordCount = daoQueryResult.RecordCount
        daoQueryResult.MoveFirst

    If intRecordCount = 0 Then
        intCVT = 0
    End If

(Вышеуказанный оператор If — это место, где я пытался вставить оператор If, но он не сработал, и я все еще получаю сообщение об ошибке «Нет текущей записи».)

    If intRecordCount <> 0 Then
        With daoQueryResult
            Do While Not .EOF

                If IsNull(!CVT) Then
                    intCVT = 0
                Else
                    intCVT = !CVT
                End If

                If IsNull(!CVY) Then
                    intCVY = 0
                Else
                    intCVY = !CVY
                End If

                If IsNull(!CVW) Then
                    intCVW = 0
                Else
                    intCVW = (!CVW)
                End If

                AvailAdjList.AddItem !AdjusterName & "," & intCVT & "," & intCVY & "," & intCVW
                .MoveNext
            Loop
        End With
    End If

Я действительно просто хочу, чтобы CVT возвращался как ноль, если он равен 0 или 1.