В работе
24 / 19 / 6
Регистрация: 13.07.2018
Сообщений: 829
Записей в блоге: 12

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

08.03.2019, 10:18. Показов 6789. Ответов 23
Метки нет (Все метки)

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

Возникла проблема. Есть форма в ней подчиненная образованная на основе запроса. Подсчет делаю ват так:
Visual Basic
1
2
3
Me.Поле45 = ""
Me.Поле45 = Me.ПФПоставщикОтправкиСрокиУведомление.Form.RecordsetClone.RecordCount
sh0 = Me.Поле45
Так у меня везде организован подсчет. И считал нормально. Но в этот такое ощущение что считает только отображенные на экране позиции. То есть выводит меньшее число.
Как правильно считать количество всех строк в запросе?
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
08.03.2019, 10:18
Ответы с готовыми решениями:

Подсчет количества строк в подчиненной таблице и вывод результата в основную
Добрый день. Подскажите пожалуйста новичку решить следующую задачу: Есть основная таблица со зданиями и подчиненная с ПК. Запрос на...

Подсчет количества строк в ленточной форме по условию
Добрый день. Вопрос вроде простой но неполучается.(на форуме ответа не нашел) Из предидущей формы исходя из выбранных условий формирую...

Автоматическое подсчет значения в подчиненной форме
В открывающейся форме нужно выбрать вес и что б просчиталась цена и записалась в таблицу. Решил действовать так, вывести при выбранном...

23
Модератор
Эксперт MS Access
 Аватар для shanemac51
12511 / 5085 / 814
Регистрация: 07.08.2010
Сообщений: 14,960
Записей в блоге: 4
08.03.2019, 12:08
Студворк — интернет-сервис помощи студентам
Цитата Сообщение от VinniPuh Посмотреть сообщение
Программирование, лени в задавании ИмЁн не терпит.
как и заполнения данными тестовых данных

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

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

чтобы не было стыдно показать сделанное любому заинтересованному лицу
0
 Аватар для VinniPuh
9147 / 6179 / 594
Регистрация: 27.03.2013
Сообщений: 20,049
08.03.2019, 12:37
Цитата Сообщение от shanemac51 Посмотреть сообщение
...чтобы не было стыдно...
Стыдно, это третьестепенный вопрос.
По мне, так НАДО, что бы было ПОНЯТНО Любому.
Даже такому как я.
Иначе кто сможет работать с непонятной БД?
Академики в програмировании наверное лишь только.
Но академиков не заставишь работать, им теории и прочии виртуальности и неопределенности для диссертаций только подавай.
Всегда разрабатываю БД, (даже которые просто для интереса) с вводом хоть и не реальных данных, но максимально приближеным к реальным, иначе ни кто кроме тебя самого, не поймет полета твоей творческой мысли, не говоря уж о том, что бы работать в такой БД, или хотя бы воспользоваться в других БД этим.
Допускаю, что не прав, но практически ни когда не помогаю по подобным БД, а только ворчанием и критиканством занимаюсь, дабы хотя бы другим было неповадно пофигизмом страдать с БД.
Ибо это по любому впоследствии скажется сотней проблеммм и тысячей вопросов, как изобрести костыль или найти оБшибку.
Это я как врач-гениколог с большим жизненным опытом, - торжественно заявляю.
0
Мы один, давай на "ты"
3858 / 1400 / 348
Регистрация: 16.06.2016
Сообщений: 3,300
08.03.2019, 14:21
Лучший ответ Сообщение было отмечено vb001 как решение

Решение

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
...
1
В работе
24 / 19 / 6
Регистрация: 13.07.2018
Сообщений: 829
Записей в блоге: 12
08.03.2019, 15:02  [ТС]
Панург, дельный совет. Домой вернусь попробу. Вы правы

Добавлено через 20 минут
Панург, красавчик. Вот то что я хотел. Сейчас везде переделаю, чтобы ошибок ранее сделанных расчетов не было
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
08.03.2019, 15:02

Запрет на создание записи в подчиненной форме при отсутствии значения в поле главной формы( или в этой же подчиненной форме) Аксесс 2003
Доброго времени суток ! Помогите , пожалуйста, решить проблему! шаг 1. В форме "frmТОиР_2" при вводе в "ПОЛЕ...

Автоматическая нумерация строк в подчиненной форме
Друзья, вновь нужна помощь:) Форма используется для просмотра. После ввода текста, в подчиненной форме происходит фильтрация данных...

Некорректное кол-во строк в RecordSet и подчиненной форме
Приветствую форумчане. Всю голову сломал. Есть таблица T_ABONEMENT в ней 13 строк. Если создать запрос типа "SELECT *...

Вставить несколько строк из подчиненной формы в поля на форме
Добрый Всем день. Нужно из подч.формы вставить 1 2 3 в поля a b c на форме,соответственно. Зараннее благодарю.

Фильтрация данных в подчиненной форме через главную/в самой подчиненной
Доброго времени суток! Столкнулся с проблемой - нужно отфильтровать публикации по типу и дате в формах Сотрудники2 и Студенты1, в них...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
24
Ответ Создать тему
Опции темы

Новые блоги и статьи
Мастера простых решений
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 снимков, он по снимкам сделал схему.
Был там один разговор по поводу свободы в материальном мире.
kumehtar 19.08.2026
Суть: рассматривается живое существо, оказавшееся внутри довольно странной системы (этого мира) и пытающееся обустроить в ней свой кусок пространства. Жизнь действительно предъявляет каждому. . .
Когда логика программы не спасает от человеческих ошибок
Maks 18.08.2026
В последнее время всё чаще и чаще сталкиваюсь с таким явлением, как абсолютная невнимательность (или глупость) пользователей. Проявляется это чаще всего на работе в коллективе. Допустим, человек с. . .
Лето уходит
kumehtar 17.08.2026
Мысли в слух
kumehtar 17.08.2026
Забавно, насколько сейчас стала доступна информация. Например о магии, духовном развитии, медитациях, и других подобных направлениях, ранее зачастую тайных, передаваемых от учителя к ученику. Хотя. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru