Вставка формы на вкладку

@vlanatvaszla · Регистрация: 10.09.2016

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

Здравствуйте.
Мне необходимо вставить форму на вкладку, естественно через vba. В сети пока ничего не нарыл.

Visual Basic
1
2
3
4
5
            DoCmd.OpenForm "frmTabs", acDesign, acHidden
            
' ...
            
            DoCmd.Close acForm, "frmTabs", acSaveYes

Просьба поделится кодом.

mobile · 11.10.2019, 01:49

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

Мне необходимо вставить форму на вкладку, естественно через vba.

Предположу, что Вы хотите НЕ создавать подформу на вкладке, а требуется заменить форму в уже имеющемся контроле подформы на вкладке. Тогда надо просто менять свойство Объект-источник (SourceObject) у контрола подформы

Visual Basic
1
Forms!frmTabs!ИмяКонтролаПодформы.SourceObject="ИмяФормы"

И это кстати совсем не обязательно делать в режиме дизайна. Вполне доступен режим формы

Если же действительно хотите создавать с нуля новый контрол подформы, то надо использовать метод CreateControl. Это не самое простое действо. Да и не нужное, поскольку в уже имеющуюся подформу можно вставлять любой источник, как было показано.

@vlanatvaszla · 11.10.2019, 07:57 **[ТС]**

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

mobile · 11.10.2019, 08:27

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

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

Мой опыт, и не только мой, убеждает, что подобные интерфейсные решения как правило говорят о недостаточно продуманной структуре данных, причем скорее всего ошибочной с точки зрения теории реляционных баз данных (к которым относится и JET SQL базовое ядро MS Access). Не очень ясно представляю себе задачу где надо программно добавить вкладку и форму на ней. Скорее совсем не представляю. Разве только в каких-нибудь научных, исследовательских задачах, где изначально нет или не может быть точной постановки Мне кажется Вам имеет смысл пересмотреть постановку, чтобы приблизить к реляционным требованиям.

@Capi · 11.10.2019, 09:20

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

вставить форму на вкладку, ...через vba

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

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

Ну, вот так (имена и прочие характеристики свои поставьте):

Visual Basic
1
2
3
4
5
6
7
Private Sub Кнопка_Click()
 Dim Ctl As Control
 DoCmd.OpenForm "Форма", acDesign
 Forms("Форма").НаборВкладок.Pages.Add
 Set Ctl = CreateControl("Форма", acSubform, acDetail, _
                         Forms("Форма").НаборВкладок.Pages(Forms("Форма").НаборВкладок.Pages.Count - 1).Name)
End Sub

@vlanatvaszla · 11.10.2019, 11:13 **[ТС]**

mobile, полностью с Вами согласен, но решение принимаю не я.

Добавлено через 23 секунды
Capi, буду пробовать. Спасибо.

@Eugene-LS · 11.10.2019, 12:29

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

но решение принимаю не я.

Позволю себе вставить свои "5 копеек" по вопросу.
- Значит - эти "решения" далеко не оптимальные, с моей скромной т.з.
Спасибо за внимание.

@alvk · 11.10.2019, 13:07

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

но решение принимаю не я.

а зарплату принимаете?

@Capi · 11.10.2019, 16:19

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

Значит - эти "решения" далеко не оптимальные

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

а зарплату принимаете?

Граждане критики, а вы не допускаете мысли, что ТС, возможно, разрабатывает конструктор форм или нечто подобное?

Если в вашем поле зрения чего-то нет, не обязательно, что этого нет вовсе.

@alvk · 12.10.2019, 16:02

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

что ТС, возможно, разрабатывает конструктор форм или нечто подобное?

Ну и пусть разрабатывает. При чём тут это? Вы читали сообщение от mobile и ответ на него ТС?
Моё сообщение в продолжении этой темы, ни про какие формы ничего не знаю.

@Capi · 12.10.2019, 19:09

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

Вы читали сообщение от mobile и ответ на него ТС?

Разумеется.

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

Моё сообщение в продолжении этой темы

В каком продолжении, простите? Где-то есть продолжение?

@alvk · 14.10.2019, 04:02

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

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

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

решение принимаю не я.

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

а зарплату принимаете?

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

а вы не допускаете мысли, что ТС, возможно, разрабатывает конструктор форм

при чём тут это? Или вы считаете, что вкладки нужно именно добавлять, а не скрывать/отображать?
Решение по разработке структуры данных принимает разработчик и никак иначе!

p.s. надеюсь всё разъяснил, что имею ввиду.

Новые блоги и статьи Все статьи Все блоги /
Уведомление о неверно выбранном значении справочника Maks 06.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .	Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt 8Observer8 05.04.2026 Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .	AkelPad-скрипты, структуры, и немного лирики.. testuser2 05.04.2026 Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .	Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .
Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .	Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизитов табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/

@vlanatvaszla 0 / 4 / 0 Регистрация: 10.09.2016 Сообщений: 392
	11.10.2019, 07:57 [ТС]
	mobile, дело в том, что мне нужно производить это действие на новой, добавленной вкладке. 0

@vlanatvaszla 0 / 4 / 0 Регистрация: 10.09.2016 Сообщений: 392
	11.10.2019, 11:13 [ТС]
	mobile, полностью с Вами согласен, но решение принимаю не я. Добавлено через 23 секунды Capi, буду пробовать. Спасибо. 0