代码之家 › 专栏 › 技术社区 › maxhugen

以连续形式标记记录

tagging ms-access

1

maxhugen · 技术社区 · 15 年前

在连续子窗体中,我根据 独特的 查询。因为它是不同的,每一行都有不包括记录ID。

是否有人知道添加复选框(或类似复选框)的方法,以便用户可以选择任何记录,然后使用这些记录通过代码创建新记录?

我更喜欢使用列表的子窗体,因为它具有许多列排序和筛选功能。

甲基丙烯酸甲酯

2 回复 | 直到 15 年前

1

Fionnuala 15 年前

根据创建记录所需的内容,类似于此示例的内容可能适合:

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

2

0

maxhugen 15 年前

我决定用窗户 列表视图 OCX控件,因为它可以为每一行添加复选框。