Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Access
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 27.04.2013, 13:29   #1
beginner09
Пользователь
 
Регистрация: 16.02.2013
Сообщений: 16
По умолчанию флажок и дезактивация элементов

Добрый день, форумчане!

И снова обращаюсь за помощью. В приложенной базе мне бы хотелось в форме сделать так, чтобы при включении Флажок0, поле pole1 стало неактивным и пустым и, соответственно, группа переключателей Группа8 также стала неактивной, а поле со списком spisok также стало неактивным, но приняло значение text.

Заранее благодарен.
Вложения
Тип файла: rar Группа переключателей c флажком.rar (12.4 Кб, 12 просмотров)
beginner09 вне форума Ответить с цитированием
Старый 27.04.2013, 20:15   #2
Myhaylo
Форумчанин
 
Регистрация: 19.07.2012
Сообщений: 520
По умолчанию

Код:
Private Sub Флажок0_Click()
  If Флажок0 Then
    pole1 = Null
    pole1.Enabled = False
    Группа8 = Null
    Группа8.Enabled = False
    ПолеСоСписком19 = "text"
    ПолеСоСписком19.Enabled = False
  End If
End Sub
Окупант, руки прочь от Украины!!! Слава Героям!
Myhaylo вне форума Ответить с цитированием
Старый 27.04.2013, 22:14   #3
Teslenko_EA
Участник клуба
 
Регистрация: 10.08.2009
Сообщений: 1,796
По умолчанию

Здравствуйте beginner09.
Myhaylo предложил верное решение Вашей задачи - "..при включении Флажок0..",
но в большинстве случаев не достаточно обрабатывать только "включение",
потому предлагаю рассмотреть некоторую доработку предложенной конструкции:
Код:
Private Sub Флажок0_AfterUpdate()
Dim b As Boolean
b = Флажок0
If b Then
    pole1 = "": Группа8 = 0: ПолеСоСписком19 = "text"
End If
b = Not b: pole1.Enabled = b: Группа8.Enabled = b: ПолеСоСписком19.Enabled = b
End Sub
иначе все выключенные контролы (.Enabled = False) будут недоступны до перезапуска формы.

Евгений.
Teslenko_EA вне форума Ответить с цитированием
Старый 28.04.2013, 23:38   #4
beginner09
Пользователь
 
Регистрация: 16.02.2013
Сообщений: 16
По умолчанию

Огромное спасибо вам, Myhaylo, а также вам, Евгений! Буду пробовать включить ваши конструкции в свою базу!
beginner09 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Флажок cherepushka Microsoft Office Access 1 01.03.2012 13:48
как включить флажок??? xpams HTML и CSS 1 15.01.2012 13:02
Флажок + MsSql FanRammstein Microsoft Office Access 3 20.07.2011 16:27
Как создать флажок? Interesniy Microsoft Office Excel 2 26.05.2011 00:12
флажок и delphi guffer Общие вопросы Delphi 1 24.08.2009 10:46