Управление размерами субформы

@golik · Регистрация: 20.04.2009

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

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

@Lecart · 30.07.2009, 07:32

У меня это было так:
Есть основная форма, и есть субформа, вставленная в основную форму. Мне нужно было делать resizing, чтобы с изменением основной формы менялся и размер субформы. Для этого вставь в событие Form_Resize() основной формы следующий код:

Visual Basic
1
2
3
4
5
6
7
8
9
10
Private Sub Form_Resize()
On Error Resume Next
Const Indent = 100 ' Отступ
 
With Me.НазваниеОкнаЧерезКотороеВиднаСубформа
   .Height = Abs(Me.InsideHeight - Me.Section(acHeader).Height -Me.Section(acFooter).Height - .Top - Rand)
   .Width = Abs(Me.InsideWidth - .Left - Rand)
End With
 
End Sub

@Lecart · 30.07.2009, 07:35

У меня это было так:
Есть основная форма, и есть субформа, вставленная в основную форму. Мне нужно было делать resizing, чтобы с изменением основной формы менялся и размер субформы. Для этого вставь в событие Form_Resize() основной формы следующий код:

Visual Basic
1
2
3
4
5
6
7
8
9
10
Private Sub Form_Resize()
On Error Resume Next
Const Indent = 100 ' Отступ
 
With Me.НазваниеОкнаЧерезКотороеВиднаСубформа
   .Height = Abs(Me.InsideHeight - Me.Section(acHeader).Height -Me.Section(acFooter).Height - .Top - Indent)
   .Width = Abs(Me.InsideWidth - .Left - Indent)
End With
 
End Sub

@Lecart · 30.07.2009, 07:36

Sorry, второй ответ верный.

@golik · 30.07.2009, 15:46 **[ТС]**

А что значит ОкноЧерезКотороеВиднаСубформа?

@golik · 30.07.2009, 15:50 **[ТС]**

Пардон, понял. Хотя прооже наверно было написать Me.ИмяСубформы

Спасибо.

Новые блоги и статьи Все статьи Все блоги /
Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.	Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .	Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .
Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .	Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .

@golik 0 / 0 / 0 Регистрация: 20.04.2009 Сообщений: 13

	Управление размерами субформы 29.07.2009, 14:02. Показов 1417. Ответов 5 Метки нет (Все метки) Подскажите плз как программно управлять размерами субформы , каким макаром их определить и программно изменить 0

@Lecart 4 / 4 / 1 Регистрация: 25.07.2009 Сообщений: 43
	30.07.2009, 07:36
	Sorry, второй ответ верный. 0

@golik 0 / 0 / 0 Регистрация: 20.04.2009 Сообщений: 13
	30.07.2009, 15:46 [ТС]
	А что значит ОкноЧерезКотороеВиднаСубформа? 0

@golik 0 / 0 / 0 Регистрация: 20.04.2009 Сообщений: 13
	30.07.2009, 15:50 [ТС]
	Пардон, понял. Хотя прооже наверно было написать Me.ИмяСубформы Спасибо. 0