以連續形式標記記錄

Question

在連續子窗體中，我顯示基於DISTINCT查詢的記錄。因爲它是獨特的，所以每一行都包含一個記錄ID 而不是。

有沒有人知道添加複選框（或類似）的方式，以便用戶可以選擇任何記錄，然後通過代碼創建新記錄？

我更喜歡將子窗體用於列表，因爲它具有許多列排序和過濾功能。

MTIA

Answer 1

僅供參考，我決定使用Windows ListView OCX控件，因爲它提供了爲每行添加複選框的功能。

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