Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Значение надписи, присоединенной к поля формы / 8 сообщений из 8, страница 1 из 1
31.01.2004, 13:05
    #32394407
Benzin
Benzin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Значение надписи, присоединенной к поля формы
Если fld.Name возвращает имя самого поля, то как получить значение присоединенной к нему надписи.
Поле PlanPay, в форме у него подпись "Плановый платеж", не могу в коде добраться до этой подписи.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
31.01.2004, 13:14
    #32394412
incold
incold
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Значение надписи, присоединенной к поля формы
forms(forms.Count-1).Controls(fld.Name).controls(0).caption
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
31.01.2004, 13:22
    #32394422
Serge Gavrilov
Serge Gavrilov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Значение надписи, присоединенной к поля формы
Уже отмечал, что controls(0) может дать ошибку, так как метка может оказаться не первой в Controls. Поэтому лучше перебрать Controls и выбрать Control с ControlType=acLabel.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
31.01.2004, 13:50
    #32394438
Benzin
Benzin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Значение надписи, присоединенной к поля формы
лучше перебрать Controls и выбрать Control с ControlType=acLabel
поясните:
мне надо заполнить таблицу именем поля и значением его присоединенной надписи(подписи). Делаю:
Код: plaintext
1.
2.
3.
For Each cnt In frm.Controls
ee = cnt.Name ' это имя самого поля
......
Next cnt

А как именно его Label вернуть, а не любой случайный?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
31.01.2004, 14:23
    #32394449
АндрейК
АндрейК
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Значение надписи, присоединенной к поля формы
Вот такой вариант:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
For Each ctl In frm.Controls
проверка, что контрол находится в обл.Данных и что контрол это поле.
If ctl.Section =  0  And ctl.ControlType = acTextBox Then
strF_Name = ctl.Name
strC_Name = frm.Controls(strF_Name).Controls( 0 ).Caption
CurrentDb.Execute  " INSERT INTO tblFields (NameField,CaptionField) VALUES ('" & strF_Name & "','" & strC_Name & "')" 
End If
Next ctl

Может и неэлегантно, но у меня работает.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
31.01.2004, 14:47
    #32394459
Serge Gavrilov
Serge Gavrilov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Значение надписи, присоединенной к поля формы
To АндрейК

Поля в таблицы не всегда отражены на форме как TextBox, это может быть и
ComboBox, и ListBox, и CheckBox, и OptionGroup.

To Benzin
Benzinмне надо заполнить таблицу именем поля и значением его присоединенной надписи(подписи). Делаю:
Не совсем понятно, что вы подразумеваете под полем. Подчиненная надпись может быть у контрола, который в свою очередь может быть связан с полем источника записей формы.
Когда форма в табличном виде, то в качестве полей этой таблиц могут быть все перечисленные выше контролы, которые расположены в Section(0)
Чтобы правильно прочитать Caption присоединенной к контролу надписи надо
Код: plaintext
1.
2.
3.
4.
For Each ctl in Me.Controls( "ControlName" ).Controls
     If ctl.ControlType = acLabel Then
............
     End If 
Next ctl
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
31.01.2004, 14:59
    #32394464
Владимир Саныч
Владимир СанычПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Значение надписи, присоединенной к поля формы
Похоже, что имеется путаница с терминологией. Если не ошибаюсь (а проверить не могу), в русском Аксессе текстбокс называется полем. И тогда поле - это и TextBox, и Field, и Margin.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
31.01.2004, 15:25
    #32394472
Serafim
Serafim
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Значение надписи, присоединенной к поля формы
пробежать в цикле по всем controls проверить type на Label и проверить

Me.Label1.Parent.Name = Me.mtTexBox.Name
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Значение надписи, присоединенной к поля формы / 8 сообщений из 8, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 337ms
Закрыть
start [/forum/topic.php?fid=45&mobile=1&tid=1676912]:
 0ms
get settings:
 5ms
get forum list:
 12ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 55ms
get topic data:
 6ms
get forum data:
 2ms
get page messages:
 24ms
get tp. blocked users:
 1ms
others: 228ms
total:  337ms
x
x
Закрыть


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