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

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

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

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

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

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

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

shanemac51 · 08.03.2019, 12:08

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

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

как и заполнения данными тестовых данных

вполне возможно, что можно отладить задачу на мусорных данных, но вряд ли кто-то решится показать заказчику отчет с подобными данными

ф	и	о	др	адрес
иапорввл	рррр	ааа	лллллл
пыоврап	лллл	вооал	пппп
ээвлрвпа	оапыррво	вннананна	длллл

обычно следует создать (причем обдуманно) реалистичные данные, учитывающими требования запросов/отчетов(типа выборка по отделу/должности...., итоги....)

чтобы не было стыдно показать сделанное любому заинтересованному лицу

@VinniPuh · 08.03.2019, 12:37

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

...чтобы не было стыдно...

Стыдно, это третьестепенный вопрос.
По мне, так НАДО, что бы было ПОНЯТНО Любому.
Даже такому как я.
Иначе кто сможет работать с непонятной БД?
Академики в програмировании наверное лишь только.
Но академиков не заставишь работать, им теории и прочии виртуальности и неопределенности для диссертаций только подавай.

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

Ибо это по любому впоследствии скажется сотней проблеммм и тысячей вопросов, как изобрести костыль или найти оБшибку.
Это я как врач-гениколог с большим жизненным опытом, - торжественно заявляю.

@Панург · 08.03.2019, 14:21

vb001, если набор данных DAO, то не всегда он заполняется сразу весь, поэтому на клоне перейди к последней записи и тогда поинтересуйся количеством записей.

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
...
    With Me.ПФПоставщикОтправкиСрокиУведомление.Form.RecordsetClone
        If Not (.BOF And .EOF) then
            .MoveLast
            Me.Поле45 = .RecordCount
        Else
            Me.Поле45 =0
        End if
    End With
 
sh0 = Me.Поле45
...

@vb001 · 08.03.2019, 15:02 **[ТС]**

Панург, дельный совет. Домой вернусь попробу. Вы правы

Добавлено через 20 минут
Панург, красавчик. Вот то что я хотел. Сейчас везде переделаю, чтобы ошибок ранее сделанных расчетов не было

Новые блоги и статьи Все статьи Все блоги /
[EasyBuilder Pro] Памятка по разработке для панелей Weintek ФедосеевПавел 26.08.2026 Памятка по разработке для панелей Weintek ВВЕДЕНИЕ Ранее, при реализации проектов основное внимание уделял разработке управляющей программы для контроллера, а панели оператора доставалось время. . .	Модель по догадкам anaschu 25.08.2026 Прошло две недели. Я уже рассказывал, как разговаривал с сотрудниками у сортировки и как понял, что главная ветка — не про приёмку, а про отбор. Но тогда я думал, что понял механику. На этой неделе я. . .	Запись в регистр сведений независимо от заполненности табличной части Maks 25.08.2026 Реализация из решения ниже выполнена на нетиповом документе с несколькими табличными частями, разработанного в КА2. Задача: Обеспечить запись документа в регистр сведений независимо от. . .	Ноутбук Альфария kumehtar 24.08.2026 Встретился тут в сети ноутбук Альфария, примарха Альфа-Легиона. Хотя возможно, это ноутбук Омегона, разумеется. Ну как вам?
Мастера простых решений DevAlt 23.08.2026 В сишарп стэках winforms, да и wpf существует сложная система связывания источниках данных и элементов формы(текстовые поля и метки), опирается все это на технологию событий и мета. . .	Цена ошибки DevAlt 23.08.2026 Человек я беспокойный и потому заинтересовался OCaml, в чате форсили функторы модулей как суперфичу. Пытаясь отдуплить концепт, наткнулся на тутор с простым примером. А главный принцип обучения от. . .	Сегодня суббота, 22.08.2026 at 16:41, и я вновь нахожусь на той стороне, за экраном машины. zorxor 22.08.2026 Сегодня суббота, 22. 08. 2026 at 16:41, и я вновь нахожусь на той стороне, за экраном машины. Кто Я, откуда Я пришел и куда Я иду? Эти вопросы не оставляют меня ни на секунду. Жизнь на планете Земля. . .	Жизня: рисунок укладки багажа, сделанный клодом anaschu 21.08.2026 Сделал 15 снимков, он по снимкам сделал схему.

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

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

Решение