Создание динамического поля в форме Microsoft Access

@Disuma · Регистрация: 13.02.2022

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

Здравствуйте!
Возникла такая задача которую я уже около месяца пытаюсь выполнить.
Есть форма, она выглядит так (изображение №1). (одна из форм которая присутствует в основной форме)
Задача в чем. Нужно сделать так, чтобы поле "где находился на лечении с по" можно было либо вставлять название больницы, либо же так (изображение №2, пример сделал на HTML), но потом получается надо сделать так, чтобы они слились в одну строку данных либо же подобно ей, чтобы после можно было перенести в документ Word методом слияния.
Сама структура таблицы выглядит так (изображение №3), связывают все таблицы между собой полем "Номер истории болезни больного"
Извиняюсь за такое плохое объяснение, надеюсь поймете.
Спасибо.

@Disuma · 05.05.2024, 16:03 **[ТС]**

Это уже запрос с выполненным условием [Формы]![Форма ввода данных]![номер истории болезни]

@ltv_1953 · 05.05.2024, 17:14

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

вторую конкатенацию которая объединяет уже записи

Поиск в разделе "конкатенация" даст много вариантов.

@АЕ · 05.05.2024, 21:44

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

Это уже запрос с выполненным условием [Формы]![Форма ввода данных]![номер истории болезни]

Вы хвастаетесь? делитесь? Открыли неизвестное? Просите помощи? Намекаете? Или что?

@alvk · 06.05.2024, 05:20

Конечно хвастается! Посмотрите сколько красивых пробелов в названиях полей. Ни у кого столько нет!

shanemac51 · 06.05.2024, 08:58

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

чтобы после можно было перенести в документ Word методом слияния.

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

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

Добавлено через 1 час 2 минуты
вбивать такие строки в диагноз - удовольствие ниже среднего

Диагноз при поступлении|
Абсцесс лобно-височной доли левого полушария головного мозга и остеомиелит лобной кости слева с кожны
Автотравма. Закрытый неосложнённый стабильный перелом зубовидного отростка С2 позвонка со смещение
Автотравма. Закрытый перелом зубовидного отростка С2 позвонка с незначительным смещением без повреж
Автотравма. ОЧМТ, ушиб головного мозга лёгкой степени. Рвано-ушибленные раны правой и левой теменных
Автотравма. ОЧМТ. Сотрясение головного мозга? Ушибленная рана теменной области слева. Множественные
Аденома гипофиза с супра-пара-ретроселлярным ростом.
Аденома гипофиза с эндо-инфра-супра-параселлярным (вправо) ростом, гормонально не активная.
закрытая осложнённая позвоночно-спинальная травма, оскольчатый нестабильный перелом тела С5 позвонка

видимо намного комфортнее иметь справочник типичных(по крайней мере) подстрок диагноза, в этом случае даже отчетность по типам/видам можно получить(частотный анализ)

Диагноз при поступлении
Абсцесс лобно-височной доли	левого полушария головного мозга и остеомиелит лобной кости слева с кожны
Автотравма.	Закрытый неосложнённый стабильный перелом зубовидного отростка С2 позвонка со смещение
Автотравма.	Закрытый перелом зубовидного отростка С2 позвонка с незначительным смещением без повреж
Автотравма.	ОЧМТ, ушиб головного мозга лёгкой степени. Рвано-ушибленные раны правой и левой теменных
Автотравма.	ОЧМТ. Сотрясение головного мозга? Ушибленная рана теменной области слева. Множественные
Аденома гипофиза	с супра-пара-ретроселлярным ростом.
Аденома гипофиза	с эндо-инфра-супра-параселлярным (вправо) ростом, гормонально не активная.
закрытая осложнённая позвоночно-спинальная травма,	оскольчатый нестабильный перелом тела С5 позвонка

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

код_д	код_ист_бол	диагноз – из пополняемого справочника
1	1	Абсцесс лобно-височной доли
2	1	левого полушария головного мозга и остеомиелит лобной кости слева с кожны
3	2	Автотравма.
4	2	Закрытый неосложнённый стабильный перелом
5	2	зубовидного отростка С2 позвонка со смещением
6	2	зубовидного отростка С3 позвонка без смещения
7	2	зубовидного отростка С4 позвонка со смещением
8	3	Автотравма.
9	3	Закрытый перелом зубовидного отростка С2 позвонка
24	3	с незначительным смещением без повреж

@Disuma · 11.05.2024, 16:02 **[ТС]**

АЕ, я дополнил предыдущее сообщение чтобы для понятности чтобы можно было понять по какой выборке идет забор данных. Я не такой частый гость в вашем форуме,поэтому извиняюсь за недопонимание.
ltv_1953, я пробовал реализовать через ConcatRelated, увы, почему-то берет данные id, а данные выражения не хочет объединять. Если потребуется могу приложить сам запрос чтобы указали что не так.
alvk, вместо того чтобы как-то получить уточнение вы ведете не компетентное поведение, вместо того чтобы как-то помочь. shanemac51, спасибо за предложение, но диагнозы при поступлении формирует сам врач, и получается то что вы видели, это примерный набор врача диагноза пациента при поступлении, данная база получается гибкая в плане мед. отделений и получается его можно реализовать под разные отделения такие как к примеру:члх, лор, офтальмология, нейрохирургия, неврология и т.д.
Однако моя текущая проблема это с конкатенация полей в одно.

@АЕ · 11.05.2024, 16:22

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

Однако моя текущая проблема это с конкатенация полей в одно.

предположу, что проблема не в этом, поскольку вы не видите разницы между конкатенацией
и слиянием записей. Конкатенация линейна!

@Disuma · 11.05.2024, 16:37 **[ТС]**

АЕ, то есть у меня не получится реализовать по такому методу?
1-запрос который отбирает нужную историю болезни и выводит информацию.

Oracle 11 SQL
1
2
3
4
5
6
7
SELECT [находился на лечении подстановка].[Номер истории болезни] AS Выражение1,
 [находился на лечении подстановка].датас AS Выражение2,
 [находился на лечении подстановка].датапо AS Выражение3,
 [находился на лечении подстановка].[название больницы] AS Выражение4,
 "С " & [датас] & " " & "по" & " " & [датапо] & " " & "в" & " " & [название больницы] & ";" AS Объединенное
FROM [находился на лечении подстановка]
WHERE ((([находился на лечении подстановка].[Номер истории болезни])=[Формы]![Форма ввода данных]![номер истории болезни]));

2-ой запрос который из 1-ого запроса совершает "конкатенацию" отобранной информации из запроса

Oracle 11 SQL
1
2
3
4
5
SELECT [находился на лечении подстановка Запрос], ConcatRelated("[находился на лечении подстановка Запрос].Объединенное","[находился на лечении подстановка Запрос]","Id = " & [находился на лечении подстановка Запрос].[Номер истории болезни],"") AS Объедененное
 INTO Лечился_С_ПО IN 'C:\AAC\База данных\ТолькоТаблицы.accdb'
FROM [находился на лечении подстановка Запрос]
WHERE ((([находился на лечении подстановка].[Номер истории болезни])=[Формы]![Форма ввода данных]![номер истории болезни]))
GROUP BY [находился на лечении подстановка Запрос].[Номер истории болезни];

@АЕ · 11.05.2024, 21:53

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

то есть у меня не получится реализовать по такому методу

При всем уважении я не патологоанатом и не Холмс. Базы вашей нет, а нюхать следы и рассматривать под лупой не мое.
Сказать могу одно. Я бы всю эту "анатомию" собирал на VBA.

@alvk · 12.05.2024, 12:03

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

alvk, вместо того чтобы как-то получить уточнение вы ведете не компетентное поведение, вместо того чтобы как-то помочь.

Вы мне будете ещё и указывать, что я должен делать? Мало того, я должен ещё у вас что-то уточнять? Да у меня лифт до такого этажа не спускается просто.

@SDKU · 12.05.2024, 12:35

Весь ответ на вопрос содержится в двух\трех (не знаю как считать подчиненная форма за одно или за два).

1. Подчиненная форма (естессно таблица)
2. Конкатенация

@Disuma · 12.05.2024, 14:10 **[ТС]**

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

Вы мне будете ещё и указывать, что я должен делать? Мало того, я должен ещё у вас что-то уточнять? Да у меня лифт до такого этажа не спускается просто.

Никто ни к чему вас не принуждает, однако стоит вам заметить то что на форуме существуют определенные правила поведения.

@Disuma · 12.05.2024, 14:17 **[ТС]**

АЕ, соглашусь с вами, по хорошему лучше делать это все на VBA, однако если не требование в создание в Microsoft Access я бы воспользовался Windows Form C#,

Сообщение от АЕ

Базы вашей нет

На счет базы, основная база не требуется, т.к. затрагиваем лишь определенную проблему, это вот. (сами SQL запросы находятся выше)
Если это вам что-то даст, и подскажите в чем проблема в последнем запросе, буду благодарен и можно будет закрывать данную тему.

@АЕ · 12.05.2024, 14:56

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

Если это вам что-то даст

Лично мне ничего. Даже не смотрел картинки. Задавать вопросы картинками это как получать зарплату фантиками.

@Disuma · 12.05.2024, 14:58 **[ТС]**

Я не могу понять, что вас не устраивает?
Все данные представлены. SQL запросы приложены сверху.

@АЕ · 12.05.2024, 15:06

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

Я не могу понять, что вас не устраивает?

Сообщение от АЕ

Базы вашей нет, а нюхать следы и рассматривать под лупой не мое.

Излагал уже вроде. Причем не надо сдавать анализы за весть подъезд в одном ведре. Достаточно прикрепить в файл нужные таблицы. Неужели правил не удосужились прочитать?

@Disuma · 12.05.2024, 15:38 **[ТС]**

Хорошо.

@АЕ · 12.05.2024, 16:30

Сообщение от АЕ

Я бы всю эту "анатомию" собирал на VBA.

как и обещал. Грубо говоря все уместилось в полтора десятка строк кода.

Кликните здесь для просмотра всего текста

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Dim rst As DAO.Recordset
Dim op As String
Dim s As String
s = "SELECT [находился на лечении подстановка].*, ""C "" & [датас] & "" по "" & [датапо] & "" в "" & [название больницы] AS описание " & _
"FROM [находился на лечении подстановка]  WHERE ((([находился на лечении подстановка].[Номер истории болезни])='" & Me.Комбинированная0 & "'))"
    Set rst = CurrentDb.OpenRecordset(s, dbOpenSnapshot)  'Только просмотр
    With rst
        Do Until .EOF = True
            op = op & !описание & vbCrLf
            .MoveNext
        Loop
    End With
    On Error Resume Next
    rst.Close
    Set rst = Nothing
Me.Поле2 = op

@АЕ · 12.05.2024, 16:34

Сообщение от АЕ

Причем не надо сдавать анализы за весть подъезд в одном ведре.

все равно 3-х литровая баночка с не существующими ссылками и линкованными в никуда таблицами у вас была...

@Disuma · 12.05.2024, 16:58 **[ТС]**

Хорошо, спасибо, только задача состояла не в выводе информации на просмотр, а чтобы оно находилось в отдельной таблице с комбинированными данными.

Новые блоги и статьи Все статьи Все блоги /
Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .	Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .	Программа опроса у.з. расходомера SLS-720F Argus19 02.09.2026 Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .
Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0. Maks 31.08.2026 При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .	Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм anaschu 30.08.2026 Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .	Оттачиваю умение писать js программы. russiannick 30.08.2026 Проектом выходного дня стало написание Книги шифров Виженера. Итогом стала версия 200, синий туман. Синий туман назван так, потому что замораживает текст под собой. Нажатие синих кнопок управляют. . .	мат медиц модель 30. презентация проекта anaschu 27.08.2026 хоп хоп хоп хидахоп, а я кладую))

@Disuma 0 / 0 / 0 Регистрация: 13.02.2022 Сообщений: 23

	Создание динамического поля в форме Microsoft Access 30.04.2024, 15:16. Показов 3957. Ответов 43 Метки microsoft access, база данных access, форма access (Все метки) Здравствуйте! Возникла такая задача которую я уже около месяца пытаюсь выполнить. Есть форма, она выглядит так (изображение №1). (одна из форм которая присутствует в основной форме) Задача в чем. Нужно сделать так, чтобы поле "где находился на лечении с по" можно было либо вставлять название больницы, либо же так (изображение №2, пример сделал на HTML), но потом получается надо сделать так, чтобы они слились в одну строку данных либо же подобно ей, чтобы после можно было перенести в документ Word методом слияния. Сама структура таблицы выглядит так (изображение №3), связывают все таблицы между собой полем "Номер истории болезни больного" Извиняюсь за такое плохое объяснение, надеюсь поймете. Спасибо. Миниатюры 0

@Disuma 0 / 0 / 0 Регистрация: 13.02.2022 Сообщений: 23
	05.05.2024, 16:03 [ТС]
	Это уже запрос с выполненным условием [Формы]![Форма ввода данных]![номер истории болезни] Миниатюры 0

@alvk 7459 / 4592 / 302 Регистрация: 12.08.2011 Сообщений: 14,383
	06.05.2024, 05:20
	Конечно хвастается! Посмотрите сколько красивых пробелов в названиях полей. Ни у кого столько нет! 0

@Disuma 0 / 0 / 0 Регистрация: 13.02.2022 Сообщений: 23
	11.05.2024, 16:02 [ТС]
	АЕ, я дополнил предыдущее сообщение чтобы для понятности чтобы можно было понять по какой выборке идет забор данных. Я не такой частый гость в вашем форуме,поэтому извиняюсь за недопонимание. ltv_1953, я пробовал реализовать через ConcatRelated, увы, почему-то берет данные id, а данные выражения не хочет объединять. Если потребуется могу приложить сам запрос чтобы указали что не так. alvk, вместо того чтобы как-то получить уточнение вы ведете не компетентное поведение, вместо того чтобы как-то помочь. shanemac51, спасибо за предложение, но диагнозы при поступлении формирует сам врач, и получается то что вы видели, это примерный набор врача диагноза пациента при поступлении, данная база получается гибкая в плане мед. отделений и получается его можно реализовать под разные отделения такие как к примеру:члх, лор, офтальмология, нейрохирургия, неврология и т.д. Однако моя текущая проблема это с конкатенация полей в одно. 0

@SDKU 598 / 404 / 51 Регистрация: 06.03.2022 Сообщений: 2,129
	12.05.2024, 12:35
	Весь ответ на вопрос содержится в двух\трех (не знаю как считать подчиненная форма за одно или за два). 1. Подчиненная форма (естессно таблица) 2. Конкатенация 0

@Disuma 0 / 0 / 0 Регистрация: 13.02.2022 Сообщений: 23
	12.05.2024, 14:58 [ТС]
	Я не могу понять, что вас не устраивает? Все данные представлены. SQL запросы приложены сверху. 0

@Disuma 0 / 0 / 0 Регистрация: 13.02.2022 Сообщений: 23
	12.05.2024, 16:58 [ТС]
	Хорошо, спасибо, только задача состояла не в выводе информации на просмотр, а чтобы оно находилось в отдельной таблице с комбинированными данными. 0

Создание динамического поля в форме Microsoft Access

Решение