Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / форма из меню программно / 5 сообщений из 5, страница 1 из 1
21.06.2004, 17:15:28
    #32570209
Alexsander
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
форма из меню программно
Можно ли программно менять назначенное строке миню действие,
например, если а = 0, то строка Вася открывает форму F0,
а если а = 1 строка Вася открывает F1 ?
...
Рейтинг: 0 / 0
21.06.2004, 17:16:54
    #32570213
Владимир Саныч
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
форма из меню программно
А что мешает внутри этого действия поставить иф?
...
Рейтинг: 0 / 0
21.06.2004, 17:27:26
    #32570248
Alexsander
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
форма из меню программно
Владимир СанычА что мешает внутри этого действия поставить иф?


так дело то не в if а в том как Васю заставить открыть F1.

Вася.F1 = True?
...
Рейтинг: 0 / 0
21.06.2004, 17:48:06
    #32570303
Rivkin Dmitry
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
форма из меню программно
Нельзя ли поподробнее, что означает
Код: plaintext
Можно ли программно менять назначенное строке миню действие
Это где и когда (с кем - я не спрашиваю)
А вообще, всегда работает, то что В.С. написал:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Sub VasiaOtkroyFormu(dum as int)
Dim fmn As String

Select Case dum
Case  0 
fmn = "F1"
Case  1 
fmn = "F2"
...
End select

Docmd.OpenForm fmn
...
Рейтинг: 0 / 0
22.06.2004, 11:14:08
    #32571101
Alexsander
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
форма из меню программно
Rivkin DmitryНельзя ли поподробнее, что означает
Код: plaintext
Можно ли программно менять назначенное строке миню действие
Это где и когда (с кем - я не спрашиваю)
А вообще, всегда работает, то что В.С. написал:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Sub VasiaOtkroyFormu(dum as int)
Dim fmn As String

Select Case dum
Case  0 
fmn = "F1"
Case  1 
fmn = "F2"
...
End select

Docmd.OpenForm fmn




А как клик по мены, по Васе прицепить к Sub VasiaOtkroyFormu?

Sub VasiaOtkroyFormu_onClick_panel1("Вася") ?
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / форма из меню программно / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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