powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как адресоваться к прикрепленной к текстбоксу метке?
20 сообщений из 20, страница 1 из 1
Как адресоваться к прикрепленной к текстбоксу метке?
    #32678735
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не могу найти, выручайте! Табличная форма, в ней контрол типа текстбокс, надо для Активконтрола определить название столбца, в котором юзер находится. Торможу...
...
Рейтинг: 0 / 0
Как адресоваться к прикрепленной к текстбоксу метке?
    #32678849
Фотография АлексейК
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
название столбца - имя активного контрола если к нему нет привязаного контрол капшена
...
Рейтинг: 0 / 0
Как адресоваться к прикрепленной к текстбоксу метке?
    #32678863
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Чего, сложный вопрос что ль?
М.б. по другому подойти надо. Вот проблема.
Отрабатываю событие Form_Click табличной формы. Среди ее колонок есть "правильные" и "неправильные". Если пользователь стоит в правильных колонках - организую ему сортировку типа On/Off по текущей колонке. В неправильных ничего не делаю.
Чтобы отделять правильные от неправильных решил их метки устроить определенным образом - дать названия типа "ControlName" & "Label". И вот тепер стою я в какой-то колонке, а до метки добраться не могу :(
Поможите! Не коллекцию же контролов формы перебирать, ведь должен же быть выход на метку из контрола, к которому она привязана ?

АлексейК - капшен есть, ведь пользователи хотят видеть русские названия колонок. А названия контролов у меня английские по принципиальным соображениям :(
...
Рейтинг: 0 / 0
Как адресоваться к прикрепленной к текстбоксу метке?
    #32678874
Фотография АлексейК
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
так назови контролы по английски, пускай правильные называются

true_textbox1 а неправильные false_textbox2 а капшены так и остаются сам по себе

if left(activecontrol.name, 4) = "true" then

....

else


end if
...
Рейтинг: 0 / 0
Как адресоваться к прикрепленной к текстбоксу метке?
    #32678900
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
АлексейКтак назови контролы по английски...Не, контролы у меня единообразно называются, впихивать в их названия какие-то признаки - неразумно, ИМХО. Ладно, буду коллекцию перебирать, хотя странно, что метка вроде привязата, а выйти на нее нельзя. Какая-то недоделка очередная, на мой взгляд.
...
Рейтинг: 0 / 0
Как адресоваться к прикрепленной к текстбоксу метке?
    #32678902
Hummer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Можно вот так сделать.
В базе напишите загрузку формы из текстового файла:
loadfromtext acForm,"tst_Form_Controls","[Path]:\tst_Form_Controls.txt"
Текстовый файл прилагается.
...
Рейтинг: 0 / 0
Как адресоваться к прикрепленной к текстбоксу метке?
    #32678909
Hummer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Можно выйти:) Я в примере показал, как это делается.
...
Рейтинг: 0 / 0
Как адресоваться к прикрепленной к текстбоксу метке?
    #32678918
Hummer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не совсем прав. Сейчас поэксперементирую ещё.

Способ более просто, писать информацию в таг текстбокса.
...
Рейтинг: 0 / 0
Как адресоваться к прикрепленной к текстбоксу метке?
    #32678969
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Действительно, в таг - хорошая альтернатива. Ладно, проблему решил, а на будущее хочу поинтересоваться - loadfromtext это что за зверь?
...
Рейтинг: 0 / 0
Как адресоваться к прикрепленной к текстбоксу метке?
    #32678990
Hummer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В общем так - от надписи к текст боксу достучаться можно: Me.Label2.accParent.Name - возвращает имя контрола, к которому привязана надпись. А вот от текстбокса к надписи достучаться у меня не получилось, потому что Me.test_textbox.accChildCount - возвращает 0.

Loadfromtext/saveastext - недокоментированные возможности аксеса, которые позволяют загружать/сохранять объекты БД в текстовые файлы. Очень удобно при пересылке объектов куда-либо.
...
Рейтинг: 0 / 0
Как адресоваться к прикрепленной к текстбоксу метке?
    #32679047
Roma R
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
MsgBox Me.ActiveControl.Controls(0).Caption
...
Рейтинг: 0 / 0
Как адресоваться к прикрепленной к текстбоксу метке?
    #32679059
Фотография Serge Gavrilov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Лифчик
...
АлексейК - капшен есть, ведь пользователи хотят видеть русские названия колонок. А названия контролов у меня английские по принципиальным соображениям :(
Если есть Caption, то (в первом приближении) его можно определить так
screen.ActiveControl.Controls(0).caption

но если контрол Группа (что конечно вряд ли), то надо перебрать Controls и проверить Label это или нет
...
Рейтинг: 0 / 0
Как адресоваться к прикрепленной к текстбоксу метке?
    #32679061
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Рома, к сожалению хотелось не само значение, а имя собственно label
...
Рейтинг: 0 / 0
Как адресоваться к прикрепленной к текстбоксу метке?
    #32679066
Roma R
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
MsgBox Me.ActiveControl.Controls(0).Name
...
Рейтинг: 0 / 0
Как адресоваться к прикрепленной к текстбоксу метке?
    #32679076
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Лифчик, уже сказали:
screen.ActiveControl.Controls(0).caption
...
Рейтинг: 0 / 0
Как адресоваться к прикрепленной к текстбоксу метке?
    #32679080
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо, Рома - довел за ручку
...
Рейтинг: 0 / 0
Как адресоваться к прикрепленной к текстбоксу метке?
    #32679104
а так?
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
авторНе коллекцию же контролов формы перебирать

почему нет?:
Код: plaintext
1.
2.
3.
4.
On error resume next
For each ctl in Me.Controls
   If ctl.Controltype = acLabel then
      'If ctl.Section = MyCtl.Section then ' если масса разделов 
      If ctl.Parent.Name = MyCtl.Name Then
...
Рейтинг: 0 / 0
Как адресоваться к прикрепленной к текстбоксу метке?
    #32679110
Фотография Serge Gavrilov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Лох ПозорныйЛифчик, уже сказали:
screen.ActiveControl.Controls(0).caption

Но в общем случае я бы не полагался на Controls(0)
...
Рейтинг: 0 / 0
Как адресоваться к прикрепленной к текстбоксу метке?
    #32679112
а так?
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
сплю.
Roma_R !
...
Рейтинг: 0 / 0
Как адресоваться к прикрепленной к текстбоксу метке?
    #32679168
Hummer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не там копал:)
...
Рейтинг: 0 / 0
20 сообщений из 20, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как адресоваться к прикрепленной к текстбоксу метке?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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