Подсчет количества строк в подчиненной форме

@vb001 · Регистрация: 13.07.2018

Студворк — интернет-сервис помощи студентам

Всем привет.
Всех представительниц женского пола с 8 марта.

Возникла проблема. Есть форма в ней подчиненная образованная на основе запроса. Подсчет делаю ват так:

Visual Basic
1
2
3
Me.Поле45 = ""
Me.Поле45 = Me.ПФПоставщикОтправкиСрокиУведомление.Form.RecordsetClone.RecordCount
sh0 = Me.Поле45

Так у меня везде организован подсчет. И считал нормально. Но в этот такое ощущение что считает только отображенные на экране позиции. То есть выводит меньшее число.
Как правильно считать количество всех строк в запросе?

@Eugene-LS · 08.03.2019, 10:34

Сообщение от vb001

Всех представительниц женского пола с 8 марта.

Присоединяюсь!

Сообщение от vb001

Как правильно считать количество всех строк в запросе?

Масса вариантов решения, например функция DCount
Перед подсчётом записи должны быть сохранены, как минимум подчинённая форма должна потерять фокус.

@vb001 · 08.03.2019, 10:40 **[ТС]**

Про DCount я знаю, но она же должна запускаться из подчиненной форме. А как из главной формы посчитать количество в ПФ?

@Eugene-LS · 08.03.2019, 10:44

Сообщение от vb001

А как из главной формы посчитать количество в ПФ?

Используйте Parent если нужно.
Me.Parent = ссылка на главною форму из подчинённой
...
Не уверен что это то что вам нужно.
...
Parent - в моём вольном переводе = Родитель (Породитель)

@vb001 · 08.03.2019, 10:48 **[ТС]**

Я объясню для чего мне это нужно.
На главной форме есть поле количество. При запуске там отображается количество в ПФ. Так же на форме есть Группа переключателей с помощью которых я фильтрую в ПФ данные. И мне так же нужно чтобы количество менялось.

Добавлено через 38 секунд
Почему у меня мой вариант не корректно считает?

@Eugene-LS · 08.03.2019, 10:50

Сообщение от vb001

И мне так же нужно чтобы количество менялось.

В зависимости от фильтра?

@vb001 · 08.03.2019, 10:51 **[ТС]**

Сообщение от Eugene-LS

В зависимости от фильтра?

Да.

@Eugene-LS · 08.03.2019, 10:51

Сообщение от vb001

Почему у меня мой вариант не корректно считает?

Потому что ваша база в формате PDF, измените название файла и всё заработает!

@vb001 · 08.03.2019, 10:53 **[ТС]**

Сообщение от Eugene-LS

Потому что ваша база в формате PDF, измените название файла и всё заработает!

у меня .accdb и .accdr
Или я не понял?

@VinniPuh · 08.03.2019, 10:57

Сообщение от Eugene-LS

...Почему у меня мой вариант не корректно считает?...

Странно.

У меня ваш пример БД, вааще не работает, не говоря уж о том, что бы считал, хотя бы неправильно..

@Eugene-LS · 08.03.2019, 10:58

Сообщение от vb001

у меня .accdb и .accdr

Это шутка была такой!

Почитайте пожалуйста Правила раздела, и старайтесь, насколько это возможно, следовать им.

Добавлено через 34 секунды

Сообщение от VinniPuh

У меня ваш пример БД, вааще не работает.

И у меня!

@VinniPuh · 08.03.2019, 11:01

Не по теме:

Сообщение от Eugene-LS

...И у меня!...

С Праздником.

@Eugene-LS · 08.03.2019, 11:05

Сообщение от vb001

В зависимости от фильтра?
Да.

Копируйте значение свойства Filter в текстовую переменную и применяйте её значение когда нужно.

Добавлено через 2 минуты

Не по теме:

Сообщение от VinniPuh

С Праздником.

- дурной пример чертовски заразителен!

@vb001 · 08.03.2019, 11:08 **[ТС]**

Почему в одной форме норм считает, в другой нет?

Visual Basic
1
2
3
Me.Поле45 = ""
Me.Поле45 = Me.ПФПоставщикОтправкиСрокиУведомление.Form.RecordsetClone.RecordCount
sh0 = Me.Поле45

@Eugene-LS · 08.03.2019, 11:16

Сообщение от vb001

Почему в одной форме норм считает, в другой нет?

Так это смотря в какой момент и откуда (откуда вызов)...
Должно так считать.

Добавлено через 3 минуты

Сообщение от vb001

Me.Поле45 = Me.ПФПоставщикОтправкиСрокиУведомление.F orm.RecordsetClone.RecordCount

А я обычно подчинёнку называю: objSubForm01 (сам объект "Подчинённая Форма") - так и короче и проще ...
На мой скромный вкус. ...

@vb001 · 08.03.2019, 11:21 **[ТС]**

Код на загрузке основной формы. Код ссылается на подчиненную которая сосзада на основе запроса. Фишка в том что он считает не все строки, а только те которые визуально вошли в подчиненную. Если ПФ растягиваю количество строк изменяет.

@VinniPuh · 08.03.2019, 11:29

А по мне, так просто не может быть такого совпадения, что в разных формах, хоть и похожих, поля имели бы идентичное поле с именем - Поле45 .
vb001, может быть вам попробовать обзывать - Имена полей не безлично и пофиг как, а - Осмысленно?
Тогда по любому будет меньше обшибок и подобных нюансов.
На 100% уверен, что всё дело в именах.
Или Имя поля не то, или Имя подформы другое.
Програмистирование, лени в задавании ИмЁн не терпит.

@Eugene-LS · 08.03.2019, 11:29

Сообщение от vb001

Код на загрузке основной формы. Код ссылается на подчиненную которая сосзада на основе запроса. Фишка в том что он считает не все строки, а только те которые визуально вошли в подчиненную.

Что то я не есть наблюдать. этих ваших уважаемых действий в опубликованном вами примере.

@VinniPuh · 08.03.2019, 11:31

Сообщение от vb001

...Если ПФ растягиваю количество строк изменяет....

Брехня.

@Eugene-LS · 08.03.2019, 11:33

Сообщение от VinniPuh

Програмистирование, лени в задавании ИмЁн не терпит.

Сгласен!

Добавлено через 1 минуту
vb001, и полностью согласен с вами!
Но от меня наверно спасибо пожалуйста завтра хорошо.
Почему иногда, наверное врозь.
Это правило.

Новые блоги и статьи Все статьи Все блоги /
WordPad для Windows 11 Jel 10.01.2026 WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .	Old Classic Notepad for Windows 11 Jel 10.01.2026 Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .	Почему дизайн решает? Neotwalker 09.01.2026 В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .	Модель микоризы: классовый агентный подход 3 anaschu 06.01.2026 aa0a7f55b50dd51c5ec569d2d10c54f6/ O1rJuneU_ls https:/ / vkvideo. ru/ video-115721503_456239114
Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ФедосеевПавел 06.01.2026 Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ВВЕДЕНИЕ Введу сокращения: аналоговый ПИД — ПИД регулятор с управляющим выходом в виде числа в диапазоне от 0% до. . .	Модель микоризы: классовый агентный подход 2 anaschu 06.01.2026 репозиторий https:/ / github. com/ shumilovas/ fungi ветка по-частям. коммит Create переделка под биомассу. txt вход sc, но sm считается внутри мицелия. кстати, обьем тоже должен там считаться. . . .	Расчёт токов в цепи постоянного тока igorrr37 05.01.2026 / * Дана цепь постоянного тока с сопротивлениями и напряжениями. Надо найти токи в ветвях. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа и решает её. Последовательность действий:. . .	Новый CodeBlocs. Версия 25.03 palva 04.01.2026 Оказывается, недавно вышла новая версия CodeBlocks за номером 25. 03. Когда-то давно я возился с только что вышедшей тогда версией 20. 03. С тех пор я давно снёс всё с компьютера и забыл. Теперь. . .

@vb001 В работе 24 / 19 / 6 Регистрация: 13.07.2018 Сообщений: 829 Записей в блоге: 12
	08.03.2019, 10:40 [ТС]
	Про DCount я знаю, но она же должна запускаться из подчиненной форме. А как из главной формы посчитать количество в ПФ? 0

@vb001 В работе 24 / 19 / 6 Регистрация: 13.07.2018 Сообщений: 829 Записей в блоге: 12
	08.03.2019, 10:48 [ТС]
	Я объясню для чего мне это нужно. На главной форме есть поле количество. При запуске там отображается количество в ПФ. Так же на форме есть Группа переключателей с помощью которых я фильтрую в ПФ данные. И мне так же нужно чтобы количество менялось. Добавлено через 38 секунд Почему у меня мой вариант не корректно считает? 0

@vb001 В работе 24 / 19 / 6 Регистрация: 13.07.2018 Сообщений: 829 Записей в блоге: 12
	08.03.2019, 11:21 [ТС]
	Код на загрузке основной формы. Код ссылается на подчиненную которая сосзада на основе запроса. Фишка в том что он считает не все строки, а только те которые визуально вошли в подчиненную. Если ПФ растягиваю количество строк изменяет. 0

@VinniPuh 9127 / 6127 / 593 Регистрация: 27.03.2013 Сообщений: 19,969
	08.03.2019, 11:29
	А по мне, так просто не может быть такого совпадения, что в разных формах, хоть и похожих, поля имели бы идентичное поле с именем - Поле45 . vb001, может быть вам попробовать обзывать - Имена полей не безлично и пофиг как, а - Осмысленно? Тогда по любому будет меньше обшибок и подобных нюансов. На 100% уверен, что всё дело в именах. Или Имя поля не то, или Имя подформы другое. Програмистирование, лени в задавании ИмЁн не терпит. 0