Выполнене функции по условию / Visual Basic

2.0.52

Планшетная версия Контакт Правила FAQ Помощь

Гость

Нов. | Гор. | Избр.

Действия ...

Доб. в избранное
Игнор. тему
Прикреп. тему
Пометить прочит. / непрочит.
Фильтр:
Сообщения автора темы
Сообщение содержит вложения
Сообщение содержит картинки
Сообщение содержит видеоклипы
Сообщение содержит аудиоклипы
Сообщение содержит картинки или видео 18+

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Выполнене функции по условию / 2 сообщений из 2, страница 1 из 1

31.05.2014, 10:45

#38657618

Сергей_Лосев

Гость

Выполнене функции по условию

Не ругайте строго, новичок.

Есть некая функция или процедура Работа1()

которую надо запустить при выполнении условия из другой процедуры test(), условие это выставленные флажок на форме.

Код: vbnet

1.
2.
3.

sub test()
If (Forms.ф_КоммПредл.Флажок49.Value = -1) Then Работа1()
End sub

Модератор: Учимся использовать тэги оформления кода - FAQ Модератор: И загляните пожалуйста в правила - указывайте среду разработки, не пересказывайте своими словами сообщения об ошибке...

выдаётся ошибка что после Работа1(), ожадется "="

...

Рейтинг:

0 / 0

| Ответить | Цитировать | Написать

31.05.2014, 12:00

#38657651

Shocker.Pro

Участник

Откуда: ->|<- :адуктО
Сообщения: 23 134
Рейтинг: 0 / 0

Выполнене функции по условию

Сергей_Лосевнекая функция или процедуратак вы уж определитесь, функция или процедура

если функция и не требуется возвращаемого значения, то так:

Код: vbnet

If (Forms.ф_КоммПредл.Флажок49.Value = -1) Then Call Работа1()

если процедура, можно проще

Код: vbnet

If (Forms.ф_КоммПредл.Флажок49.Value = -1) Then Работа1

...

Рейтинг:

0 / 0

| Ответить | Цитировать | Написать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=60&mobile=1&tid=2156344]:	0ms
get settings:	7ms
get forum list:	11ms
check forum access:	3ms
check topic access:	3ms
track hit:	59ms
get topic data:	13ms
get forum data:	3ms
get page messages:	36ms
get tp. blocked users:	1ms
others:	297ms

total:	433ms