Форум программистов, компьютерный форум, киберфорум
Microsoft Access
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
 
Рейтинг 4.66/29: Рейтинг темы: голосов - 29, средняя оценка - 4.66
В работе
24 / 19 / 6
Регистрация: 13.07.2018
Сообщений: 829
Записей в блоге: 12

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

08.03.2019, 10:18. Показов 6695. Ответов 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
12234 / 5081 / 814
Регистрация: 07.08.2010
Сообщений: 14,950
Записей в блоге: 4
08.03.2019, 12:08
Студворк — интернет-сервис помощи студентам
Цитата Сообщение от VinniPuh Посмотреть сообщение
Программирование, лени в задавании ИмЁн не терпит.
как и заполнения данными тестовых данных

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

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

чтобы не было стыдно показать сделанное любому заинтересованному лицу
0
 Аватар для VinniPuh
9147 / 6171 / 594
Регистрация: 27.03.2013
Сообщений: 20,046
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
Ответ Создать тему
Новые блоги и статьи
Рефакторинг программы уравнивания.
Massaraksh7 26.05.2026
Пример по предыдущей записи в блоге. Но, надо заметить, что, во-первых, там оптимизация не только математики, но и работы с базой данных, и с графами, а во-вторых, это ещё не всё.
Использование TThread в Lazarus для математических вычислений.
Massaraksh7 25.05.2026
Производя рефакторинг своих программ на предмет ускорения их работы, обратил внимание на такой аспект, как сокращение времени матвычислений. Дело в том, что приходится работать с большими матрицами. . .
Модель здравосохранения 18. Чем здоровее работник, тем быстрее выгорает
anaschu 24.05.2026
Имитационная модель корпоративного здравоохранения: что показывает математика Сегодня в модели рабочего коллектива на AnyLogic появились три новые механики — выгорание через накопленную усталость,. . .
Модель здравосохранения 17. Планы на выгорание
anaschu 23.05.2026
Вот конкретная схема реализации: В классе Работник добавить: накопленнаяУсталость — растёт каждый час работы, снижается в перерывы и болезни коэффициентПрезентеизма — снижает продуктивность. . .
Изменение цветов в палитре gif файла aka фавикона
russiannick 23.05.2026
Изменение цветов в палитре gif файла, юзаемого как фавиконка в составе html-файла, помещенная в base64, средствами нативного Java Script, навеянное сном в майский день. Для работы необходим браузер,. . .
Модель здравосохранения 16. Слишком хорошие и здоровые сотрудники уходят, недовольные зарплатой
anaschu 23.05.2026
Отладка увольнений и настройка производительности Сегодня во второй половине дня разобрались с механикой увольнений и настроили коэффициент сложности заданий. Вот что было сделано. . . .
Как я стал коммунистом))) Модель сохранения здоровья сотрудников, запись блога номер 15
anaschu 23.05.2026
Внезапно хорошее здоровье сотрудников не нужно капиталистам?))
Модель здравоСохранения 15. Как мы чинили AnyLogic модель рабочего коллектива: сочленение диаграммы состояний болезней и поломок в ресурспул
anaschu 23.05.2026
Как мы чинили AnyLogic модель рабочего коллектива Сегодня разобрались с пятью багами, из-за которых модель либо падала с ошибкой, либо давала совершенно бессмысленные результаты. Каждый баг был. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru