Запись меток в непрерывной форме

Question

В непрерывной подчиненной форме я отображаю записи на основе запроса DISTINCT. Поскольку он отличается, каждая строка делает не включает идентификатор записи.

Кто-нибудь знает, как добавить флажок (или аналогичный), чтобы пользователь мог выбрать любую из записей, которые затем будут использоваться для создания новых записей через код?

Я предпочитаю использовать подформат для списка, так как он содержит множество функций сортировки и фильтрации столбцов.

MTIA

Answer 1

FYI, я решил использовать ОС Windows ListView OCX control, так как он предлагает возможность добавить флажок для каждой строки.

Answer 2

В зависимости от того, что вам нужно создать записи, что-то вроде этого образца могут подойти:

Function DisplaySelectedCompanyNames() 
    Dim i As Long 
    Dim F As Form 
    Dim RS As Recordset 

    '' Get the form and its recordset. 
    Set F = Forms![Customers1] 
    Set RS = F.RecordsetClone 

    '' Move to the first record in the recordset. 
    RS.MoveFirst 

    '' Move to the first selected record. 
    RS.Move F.SelTop - 1 

    '' Enumerate the list of selected records presenting 
    '' the CompanyName field in a message box. 
    For i = 1 To F.SelHeight 
    MsgBox RS![CompanyName] 
    RS.MoveNext 
    Next i 

End Function 

Дополнительная информация: http://support.microsoft.com/kb/208502