GoTo?

[Чудик]

Надо перейти из одного места модуля формы в другое место другого модуля формы. Известно, что подобный переход внутри одного и того же модуля формы осуществляется при помощи GoTo, а как же за пределы модуля?

[Шнурок]

а может слить все в один модуль

[ANDLL]

За пределы ПРОЦЕДУРЫ вызовы передавать нельзя.

[Tarik]

Хм... А не легче ли заюзать старый дедовский способ, а именно процедуры?

[Чудик]

Хм... А не легче ли заюзать старый дедовский способ, а именно процедуры?

Не понял намека?

[ANDLL]

Код: Выделить всё

Public sub X1()
  Y1()
end sub

public sub Y1()
  Beep
end sub


[Чудик]

Да, но такая фича уместна, если процедура Y1() располагается в стандартном модуле. Разве не так? А мне было бы интересно расположить Х1 в одной форме, а Y1 в другой.

[Tarik]

Дык а что тебе мешает сделать Form2.Y1 ?

[Ramzes]

или обьвит Y1 как Public, тогда она вызоветься без всяких

Код: Выделить всё

form1.Y1


а просто

Код: Выделить всё

Y1


[ANDLL]

или обьвит Y1 как Public, тогда она вызоветься без всяких

Код: Выделить всё

form1.Y1


а просто

Код: Выделить всё

Y1


Неправда.

[tyomitch]

или обьвит Y1 как Public, тогда она вызоветься без всяких

Код: Выделить всё

form1.Y1


а просто

Код: Выделить всё

Y1


Неправда.

Более того, если не объявить Y1 как Public, то и form1.Y1 не сработает.
Ramzes жестоко заблуждается...

[Tarik]

tyomitch, а вот и нет! Если написать просто

Код: Выделить всё

Sub Y1 ()

End Sub


То Form2.Y1 прекрасно работает

[GSerg]

Когда я прочитал название темы, мне захотелось сразу ответить "ПыдиНа"

[hCORe]

Мне почему-то тоже

[ANDLL]

tyomitch, а вот и нет! Если написать просто

Код: Выделить всё

Sub Y1 ()

End Sub


То Form2.Y1 прекрасно работает

Да нет же

[Tarik]

Да как нет, сам только что проверил:
1. Запускаем VB
2. Создаём проект
3. Добавляем ещё одну форму
4. В ней пишем вышеозначенный код
5. В Form1 пишем

Код: Выделить всё

Form2.Y1


Всё прекрасно пашет

[SHURUP]

Толи я что-то нетак делаю, но у меня пишет
"Method or data member not found"
С объектами на формах такое катит, а вот с переменными и функциями (процедурами) - дзуськи.
И ИМХО вообще оно и не должно работать - т.к. в этом случае теряется суть объявлений переменных и функций как Private

[ANDLL]

Да как нет, сам только что проверил:
1. Запускаем VB
2. Создаём проект
3. Добавляем ещё одну форму
4. В ней пишем вышеозначенный код
5. В Form1 пишем

Код: Выделить всё

Form2.Y1


Всё прекрасно пашет

Пардон, весьма извиняюсь Просто начали с одново, а плано перешли к другому.

[tyomitch]

tyomitch, а вот и нет! Если написать просто

Код: Выделить всё

Sub Y1 ()

End Sub


То Form2.Y1 прекрасно работает

Никакого противоречия зджесь нет:

If not explicitly specified using Public, Private, or Friend, Sub procedures are public by default

А вот как написал Ramzes - просто Y1 - не будет работать никогда.