ms-access - 連続フォームでレコードにタグを付ける

Question

連続サブフォームでは、 DISTINCTクエリに基づいてレコードを表示します。個別であるため、各行にはレコード ID が含まれていません。

ユーザーがコードを介して新しいレコードを作成するために使用される任意のレコードを選択できるように、チェックボックス(または同様のもの)を追加する方法を知っている人はいますか?

多くの列の並べ替え機能とフィルター機能を備えているため、リストにサブフォームを使用することを好みます。

MTIA

Answer 1

レコードを作成するために必要なものに応じて、次のサンプルのようなものが適している場合があります。

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

Answer 2

参考までに、各行にチェックボックスを追加できるWindows ListView OCX コントロールを使用することにしました。