Как получить максимальное значение формы «Набор записей»? - PullRequest
Новая
       8

Как получить максимальное значение формы «Набор записей»?

0 голосов
/ 14 февраля 2019

Структура формы:
- frm_00_00_MainForm;
- - frm_02_02_Groups_Tbl;
- - frm_reg_GroupsStud_Stud_IdGroup_tbl.
Источник данных формы ([frm_reg_GroupsStd] * 100_6 * __6_t_t_t_t_t_t_t_t *) * * * * * * * * *


Мне нужно получить максимальное значение поля [id_stud].
Чтобы код обрабатывал не все строки запроса, а только те, которые в форме, я думаю, это может ускоритькод.
Для этого я создаю форму «Набор записей».
Для этого я пытаюсь использовать следующий код: 

    Private Sub btnMaxValue_Click()
            Dim rst As DAO.Recordset
            Dim studMax As Integer

            Set rst = Me.[frm_reg_GroupsStud_Stud_IdGroup_tbl].Recordset
             studMax = rst.???

End Sub

Но я не понимаю, как получить максимальное значениеполя [id_stud].

Вопрос.
Как получить максимальное значение формы "Набор записей"?

enter image description here

1 Ответ

0 голосов
/ 14 февраля 2019

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

Private Function GetMax() As Long
Dim rst As DAO.Recordset
Dim studMax As Long

    Set rst = Me.RecordsetClone

    rst.Sort = "Id_stud"

    rst.MoveLast

    studMax = rst("Id_stud")

    GetMax = studMax

    rst.Close

End Function

Необходимо добавить обработку ошибок и код, чтобы проверить, доступны ли записи в наборе записей.Вы можете присвоить значение функции GetMax() любому элементу управления или логике VBA из подформы.

...