MS Access vba программный доступ и настройка свойств метки - PullRequest
Новая
       9

MS Access vba программный доступ и настройка свойств метки

2 голосов
/ 13 марта 2012

Возможно ли программный доступ к меткам с помощью VBA. Я хотел бы создать несколько меток, используя цикл for, такой как показанный ниже, который установит все метки с именем «Label1» в «Label20» в видимые 

for a_counter = 1 to 20
Me.Label(a_counter).Visible = True
next a_counter

Возможно ли что-то подобное описанному выше?

Ответы [ 2 ]

4 голосов
/ 13 марта 2012

Вы можете ссылаться на каждый из этих элементов управления метками, от «Label1» до «Label20», по имени из коллекции элементов управления формы. 

For a_counter = 1 To 20
    Me.Controls("Label" & a_counter).Visible = True
Next a_counter
1 голос
/ 13 марта 2012
Ярлыки

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

function listLabels()
dim m_ctl as control

for each m_ctl in screen.activeForm.controls
    if m_ctl.type = ....   'please check the control types available!
        debug.print m_ctl.name
    end if
next m_ctl

end function

Будьте осторожны.Я даже не уверен в свойствах элемента управления (.type, .name), но вы легко найдете их в справке.Ищите «контрольный» объект.

...