Как я могу предварительно выполнить операции над строками в табличной форме в MS Access?

Question

У меня есть форма табличного типа, основанная на типе запроса SELECT * FROM table в MS-доступе.

Я бы хотел:

• проверить / выбрать строки в этой форме
• итерация по отмеченным / выбранным строкам

Answer 1

Вы можете использовать набор записей или клон наборов записей.

 With Me.Recordsetclone
    .MoveFirst
    Do While Not .EOF
        MsgBox "Field 1 is: " & .Fields(1)
        .MoveNext
    Loop
End with

Вы также можете позволить пользователю выделять записи и работать с ними (http://support.microsoft.com/kb/208502).

  Function DisplaySelectedCompanyNames()
     Dim i As Long
     Dim frm As Form
     Dim rs As DAO.Recordset

     '' Get the form and its recordset.
     Set frm = Forms![Customers]
     Set rs = frm.RecordsetClone

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

     '' Move to the first selected record.
     rs.Move frm.SelTop - 1

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

  End Function