Форумы HiProg.com - MS ACCESS, VBA, VB

 

Ответить на сообщение

Вернуться к теме

Вы отвечаете на сообщение:

ник: Гоблин
Пробовал в самом начале. Проблема с обращением к форме. Почему-то ошибка все время выскакивает. Синтаксис *нехватка знаний^малоопытность=#######

Вот простой пример:
на форме стоит полесосписком1 с кодом после обновления

If Len(Me.ПолеСоСписком1) <> 0 Then
Me.ЛинияГ.TOP = Me(ПолеСоСписком1.Column(1) & 1).TOP
Me.ЛинияВ.left = Me(ПолеСоСписком1.Column(1) & 1).left
For i = 1 To 10
...
Ну и так далее. Тут все работает. Переношу кнопки на другую форму, что бы была рядом. Придется менять код:

If Len(Me.ПолеСоСписком1) <> 0 Then
forms![ФормаБланка]!ЛинияГ.TOP = Me(ПолеСоСписком1.Column(1) & 1).TOP
forms![ФормаБланка]!ЛинияВ.left = Me(ПолеСоСписком1.Column(1) & 1).left
For i = 1 To 10
...
Так вот неудается найти поле, указанное в Полесосписком1, поскольку оно в другой форме получается. Тут получается, что параметры кнопками управления задавать надо для элементов в другой форме. Т.е. линия горизонтали должна скакнуть по координатам, указанным в полесосписком1 на другой форме. Че-то как-то синтаксис блин что ли.. В общем не находит он это поле, хотя и фокус ставил, и че только не делал....
А там все так получается. Поэтому при нахождении кнопок на самой форме все работает, а при их переносе на другую форму...


Ваше имя:

Пароль:

Цитировать: [quote][/quote] Код: [code][/code]
Жирный: [b][/b] Наклонный: [i][/i]
URL: [url][/url] 

Сообщение:

 Размер файла не более 50 Кбт. Большие файлы можно размещать на www.slil.ru

Прикрепить:

 

Для вставки смайлов в текст щелкните по значку.