Флажок всегда возвращает false

Question

У меня есть форму, заполненную элементами из таблицы. У каждого элемента есть флажок, который позволяет пользователю запрашивать этот элемент после нажатия кнопки. Запрошен флажок. Я пробовал  Me!Requested = 0, и это дает тот же результат.

Проблема в том, что значение флажка всегда возвращает false, даже если оно проверено. Ссылаясь на код, я всегда получаю первое сообщение.

Private Sub btnSubmitRequest_Click() 

If Me!Requested = False Then 
    MsgBox ("Please select at least 1 item to check out.") 
    Exit Sub 
Else 
    MsgBox ("123") 
End If 

End Sub 

Answer 1

Как я уже писал выше, Me!Requested будет смотреть только на Requested флажок в текущей записи. Так каково бы ни было случайное значение, оно будет определять результат.

Если вы хотите, чтобы убрать , по крайней мере одинRequested checkbox выбрано, вам необходимо взглянуть на все из них. Вы можете сделать это, например. с петлей над Me.RecordsetClone, например.

Dim rs As DAO.Recordset 
Dim nSelected As Long 

nSelected = 0 
Set rs = Me.RecordsetClone 
Do While Not rs.EOF 
    If rs!Requested = True Then 
     nSelected = nSelected + 1 
    End If 
    rs.MoveNext 
Loop 
rs.Close 

MsgBox "Selected: " & nSelected