Код для обработки видимости вкладок.

Koriolan

Дата: 09.11.2009 17:19:20

Задача простая. но я застопорился (знаний систематизированных не хватает, увы)
В некоторой форме есть группа переключателей, состоящая из трех переключателей и группа вкладок. Необходимо написать код, выполняющий следующую операцию:
Если выбран первый переключатель - отображается только первая вкладка
Если выбран второй переключатель - первая и вторая вкладки
Если выбран третий переключатель - первая и третья вкладки.
Загвоздка именно в самой постановке условия.
Подскажите, плз.

П-Л

Дата: 09.11.2009 17:43:01

Непонятно что непонятно.

select case Me.optGroup
case 1
    Me.tab1.Visible = True
    Me.tab2.Visible = False
    Me.tab3.Visible = False
case 2
    ....
case 3
    ....
end select

Koriolan

Дата: 09.11.2009 18:02:46

Я пытался решить не через Case а через if и я не смог поставить правильно условие:

if что-то тут (не знаю как правильно обратиться к группе) = 1 Then

Ну а дальше все вроде бы правильно.

Владимир Саныч

Дата: 09.11.2009 18:07:14

Сама группа - это обычный контрол. Ее значение равняется значению OptionValue того переключателя, который выбран.

Koriolan

Дата: 09.11.2009 19:43:48

Владимир Саныч

Сама группа - это обычный контрол. Ее значение равняется значению OptionValue того переключателя, который выбран.

т.е это звучало бы в моем случае приблизительно так:

If Группа51.Value = 1 Then

Я правильно понял?

Владимир Саныч

Дата: 09.11.2009 21:35:54

Да. Причем .Value можно опустить, как всегда.

Koriolan

Дата: 10.11.2009 11:56:54

Владимир Саныч, спасибо.

Rivkin Dmitry

Дата: 10.11.2009 12:27:55

Как-то так:

Private Sub MyOptGr_AfterUpdate()
    Dim i As Byte
    
    With Me.MyTab
        For i = 1 To .Pages.Count - 1
            .Pages(i).Visible = False
            
        Next
    
        .Pages(Me.MyOptGr).Visible = True
    
    End With

End Sub

MyOptGr - по-умолчанию = 0, значения радиобаттонов, соответственно 0,1.2
MyTab - три вкладки. По-умолчанию первая - видима, остальные - нет

Koriolan

Дата: 11.11.2009 01:58:41

Rivkin Dmitry

Как-то так:

MyOptGr - по-умолчанию = 0, значения радиобаттонов, соответственно 0,1.2
MyTab - три вкладки. По-умолчанию первая - видима, остальные - нет

По условию вкладки должны отображаться не по нарастающей, а особенным способом:
Если выбран третий переключатель - первая и третья вкладки.

Дата: 11.11.2009 07:48:56

Koriolan

Rivkin Dmitry

вот ответ
что вам не ясно?