Выбрав поле в списке открыть соответствующую форму

@Irina_N · Регистрация: 28.04.2011

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

Подскажите, пожалуйста!
В форме создан список на основе таблицы. Необходимо, чтобы при нажатии на к.л. строке можно было открыть форму именно с этими данными. В процедуру для обработки событий для списка было внесено следующее:

Visual Basic
1
2
3
Private Sub Список8_Click()
Me![ID] = Me.Список8.Column(0)
End Sub

Visual Basic
1
2
3
4
5
6
7
Private Sub Список8_DblClick(Cancel As Integer)
Dim stDocName As String
    Dim stLinkCriteria As String
 
    stDocName = "Форма ввода данных"
    DoCmd.OpenForm stDocName, , , stLinkCriteria
End Sub

У меня открывается форма с первыми стоящими в списке данными.

@WiLex · 30.04.2011, 00:27

Visual Basic
1
DoCmd.OpenForm stDocName, acNormal, "", "[Код Квартиры]=[Forms]![Форма1]![Список8]", acEdit, acNormal

где то так

да и убейте процедуру Private Sub Список8_Click()

@Irina_N · 30.04.2011, 11:53 **[ТС]**

Большое спасибо! Все получилось.

Новые блоги и статьи Все статьи Все блоги /
1С: Контроль уникальности заводского номера Maks 23.03.2026 Алгоритм контроля уникальности заводского (или серийного) номера на примере документа выдачи шин для спецтехники с табличной частью. Данные берутся из регистра сведений, по которому настроено. . .	Хочу заставить корпорации вкладываться в здоровье сотрудников: делаю мат модель здравосохранения anaschu 22.03.2026 e7EYtONaj8Y Z4Tv2zpXVVo https:/ / github. com/ shumilovas/ med2. git	1С: Программный отбор элементов справочника по группе Maks 22.03.2026 Установка программного отбора элементов справочника "Номенклатура" из модуля формы документа. В качестве фильтра для отбора справочника служит группа номенклатуры. Отбор по наименованию группы. . .	Как я обхитрил таблицу Word Alexander-7 21.03.2026 Когда мигает курсор у внешнего края таблицы, и нам надо перейти на новую строку, а при нажатии Enter создается новый ряд таблицы с ячейками, то мы вместо нервных нажатий Энтеров мы пишем любые буквы. . .
Krabik - рыболовный бот для WoW 3.3.5a AmbA 21.03.2026 без регистрации и смс. Это не торговля, приложение не содержит рекламы. Выполняет свою непосредственную задачу - автоматизацию рыбалки в WoW - и ничего более. Однако если админы будут против -. . .	1С: Программный отбор элементов справочника по значению перечисления Maks 21.03.2026 Установка программного отбора элементов справочника "Сотрудники" из модуля формы документа. В качестве фильтра для отбора служит значение перечислений. / / Событие "НачалоВыбора" реквизита на форме. . .	Переходник USB-CAN-GPIO Eddy_Em 20.03.2026 Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .	Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .

@Irina_N 0 / 0 / 0 Регистрация: 28.04.2011 Сообщений: 12
	30.04.2011, 11:53 [ТС]
	Большое спасибо! Все получилось. 0