Форум программистов, компьютерный форум, киберфорум
Наши страницы
MS Access
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
mamani
3 / 3 / 0
Регистрация: 21.02.2011
Сообщений: 35
1

Скрытие вкладок подчиненной формы с условием главной формы

20.06.2011, 12:46. Просмотров 963. Ответов 1
Метки нет (Все метки)

Вопрос вот в чем Уважаемые!
Как сделать так, чтобы при выборе на главной форме параметра VZB, на подчиненной форме оставалась лишь необходимая вкладка, т.е. если я выбрал параметр VZB =1, то осталась вкладка 1 и так далее
Заранее всем благодарен!
0
Вложения
Тип файла: 7z db_.7z (28.8 Кб, 23 просмотров)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
20.06.2011, 12:46
Ответы с готовыми решениями:

Открытие формы с условием отбора с использованием подчиненной формы
День добрый. Подскажите пожалуйста по следующему вопросу В форме "Задачи...

Дублирование записи главной формы вместе со всеми записями подчиненной формы
есть таблица: билет поля: идбилет; идклиент; идзалог подчиненная таблица:...

Объединение вертикальных полей подчиненной формы в одно поле главной формы
Доброго времени суток уважаемые форумчане! Подскажите пож-та каким образом...

Сравнение значения поля подчиненной формы с элементом списка главной формы
Здравствуйте. Есть форма, на которой есть список, куда выводятся некоторые...

Переход к последней записи подчиненной табличной формы при активации главной формы
Добрый день. Можно я в очередной раз спрошу глупость?)... Есть форма...

1
mamani
3 / 3 / 0
Регистрация: 21.02.2011
Сообщений: 35
20.06.2011, 15:40  [ТС] 2
Всем спасибо! дописал код!
решение вот!
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
Private Sub VZB_AfterUpdate()
Dim j As Integer
    j = VZB
   Dim i As Integer
        If j = 1 Then
        'MsgBox 1
        Me.o_TechChar.Controls.Item(4).Pages(j).Visible = True
        Me.o_TechChar.Controls.Item(4).Pages(j).SetFocus
        
        For i = 2 To 6
        Me.o_TechChar.Controls.Item(4).Pages(i).Visible = False
        Next
        'Me.Form.Refresh
    End If
    
        If j = 6 Then
        'MsgBox 2
        Me.o_TechChar.Controls.Item(4).Pages(j).Visible = True
        Me.o_TechChar.Controls.Item(4).Pages(j).SetFocus
        For i = 1 To 5
        Me.o_TechChar.Controls.Item(4).Pages(i).Visible = False
        Next
        'Me.Form.Refresh
    End If
        If j > 1 And j < 6 Then
        'MsgBox 3
        Me.o_TechChar.Controls.Item(4).Pages(j).Visible = True
        Me.o_TechChar.Controls.Item(4).Pages(j).SetFocus
        For i = 1 To j - 1
        'MsgBox "3.1" & j
        Me.o_TechChar.Controls.Item(4).Pages(i).Visible = False
        Next
        For i = j + 1 To 6
        'MsgBox "3.2" & j
        Me.o_TechChar.Controls.Item(4).Pages(i).Visible = False
        Next
       
        End If
End Sub
Тема закрыта))))
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
20.06.2011, 15:40

Отображение/скрытие подчиненной формы
Всем доброго дня и отличного настроения, помогите новичку, а то памяти совсем...

Скрытие/отображение подчиненной формы по нажатию кнопки
Есть 4 формы. 3 из них подчиненные формы для первой. В первой форме 3 кнопки....

Скрытие столбцов таблицы подчиненной формы через VBA или макрос
Друзья, помогите решить проблему. Есть разделенная форма источник данных в...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru