powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Опять контрол в подчиненной форме
17 сообщений из 17, страница 1 из 1
Опять контрол в подчиненной форме
    #32242116
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Чем заменить обращение к контролу в подчиненной форме

Код: plaintext
Forms!frmName.Child.Form.Controls(controlName)

если frmName.Child.Form -хочется иметь как параметр?

ФАК читал-читал, но не врубился.
...
Рейтинг: 0 / 0
Опять контрол в подчиненной форме
    #32242121
sasha_1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
dim f as form - параметр
f=Forms!frmName.Child.Form
f.Controls(controlName)
...
Рейтинг: 0 / 0
Опять контрол в подчиненной форме
    #32242142
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ФАК читал-читал, но не врубился
Forms!frmName.ChildFormName.Form.Controls(controlName)
=
Forms!frmName!ChildFormName.Form!controlName
...
Рейтинг: 0 / 0
Опять контрол в подчиненной форме
    #32242143
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ой.
если frmName.Child.Form
Forms("frmName").Controls("Child").Form.Controls("controlName")
...
Рейтинг: 0 / 0
Опять контрол в подчиненной форме
    #32242154
Хам трамвайный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Forms(e).Controls(f).Controls(d)
...
Рейтинг: 0 / 0
Опять контрол в подчиненной форме
    #32242158
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2Хам Трамвайный
Forms(e).Controls(f).Controls(d)
не будет работать, у
Forms(e).Controls(f)
нет свойства или метода Controls
...
Рейтинг: 0 / 0
Опять контрол в подчиненной форме
    #32242174
Хам трамвайный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
тогда как объяснить
вот такой РАБОТАЮЩИЙ код?

Dim r As String, d As String, f As String, e As String
r = "000"
d = "ПолеАдрес"
f = "subFormКонтрагенты"
e = "Контрагенты"
Forms(e).Controls(f).Controls(d) = r
...
Рейтинг: 0 / 0
Опять контрол в подчиненной форме
    #32242179
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Поправка: "не всегда будет работать".
Где это "не всегда" - навскидку не скажу, пожалуй. М.б. в строках SQL, м.б. для подчиненных форм 2-го и далее уровня вложенности.
...
Рейтинг: 0 / 0
Опять контрол в подчиненной форме
    #32242183
sasha_1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
>тогда как объяснить
>вот такой РАБОТАЮЩИЙ код?
милостью Аксеса
правильней так
Forms(e).Controls(f).Form.Controls(d)

2 Лифчик:
ау! ответы удовлетворили?
...
Рейтинг: 0 / 0
Опять контрол в подчиненной форме
    #32242195
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Иес!

Да здравствует форум аксесса с его ФАКом и замечательными экспертами!
...
Рейтинг: 0 / 0
Опять контрол в подчиненной форме
    #32242276
Хам трамвайный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Forms(e).Controls(f).Form.Controls(d)
это для А97 актуально
для А2000 и выше
Forms(e).Controls(f).Controls(d)
повышай свой уровень
...
Рейтинг: 0 / 0
Опять контрол в подчиненной форме
    #32242286
sasha_1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 Хам:
я тебя умоляю :)
что 97, что 2000, хоть 3000
у контрола нет свойства Controls и быть не может.
оно есть только у формы.
а то, что Аксес позволяет вольности програмерам,
так это до поры до времени.
...
Рейтинг: 0 / 0
Опять контрол в подчиненной форме
    #32242306
Хам трамвайный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Саша1 я тебя умоляю
читай справку
"controls является коллекцией формы, используемой по умолчанию"
так как подформа является тоже контролом, то мое выражение работает абсолютно верно.

ты же не пишешь
=Forms("Заказы").controls("КодЗаказа")
а предпочитаешь вот так
=Forms("Заказы")("КодЗаказа")
хотя эти 2 выражения абсолютно идентичны.
как писать программисту: короче или длинее , решать каждому,
но говорить, что мое выражение "неверно" абсолютно недопустимо.
...
Рейтинг: 0 / 0
Опять контрол в подчиненной форме
    #32242309
sasha_1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
>но говорить, что мое выражение "неверно" абсолютно недопустимо.
и где я такое сказал???

я сказал, что: у контрола нет свойства Controls и быть не может.

Опять же попробуй свое выражение подставить как параметр запроса.
...
Рейтинг: 0 / 0
Опять контрол в подчиненной форме
    #32242310
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Мальчики, не ругайтесь! Я сделал, как Geo сказал. Может это и избыточно, зато дешево, надежно и практично
...
Рейтинг: 0 / 0
Опять контрол в подчиненной форме
    #32242315
Хам трамвайный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
причем здесь запрос?
речь шла о VBA
...
Рейтинг: 0 / 0
Опять контрол в подчиненной форме
    #32242321
sasha_1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ладно, закрыли тему, каждый остался при своем мнении.
:)
...
Рейтинг: 0 / 0
17 сообщений из 17, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Опять контрол в подчиненной форме
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]