ReSQL.ru
     
powered by simpleCommunicator - 2.0.55     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Помогите с синтаксисом If Then Else
19 сообщений из 19, страница 1 из 1
Помогите с синтаксисом If Then Else
    #37231273
Kyubi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kyubi
Гость
Доброй ночи, форумчанам!

Подскажите, пожалуйста, как после слова else записать несколько операций с docmd?

мой вариант:
Код: plaintext
Else DoCmd.OpenQuery ("new_count") And DoCmd.OpenQuery("new_sale")
не прокатывает...
...
Рейтинг: 0 / 0
25.04.2011, 02:51
| Ответить | Цитировать | Написать  
Помогите с синтаксисом If Then Else
    #37231278
скукотища
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
скукотища
Гость
Kyubi,

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
If <условие> Then
   <команда  1 >
   <команда  2 >
   ...
   <команда N>
Else
   <команда  1 >
   <команда  2 >
   ...
   <команда N>
End If
...
Рейтинг: 0 / 0
25.04.2011, 03:22
| Ответить | Цитировать | Написать  
Помогите с синтаксисом If Then Else
    #37231286
Kyubi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kyubi
Гость
Спасибо, скукотища! Помогло раскидать комбинацию if then else по строкам (до этого все было сляпано одной строкой). Теперь код отлично отрабатывает!
...
Рейтинг: 0 / 0
25.04.2011, 04:59
| Ответить | Цитировать | Написать  
Помогите с синтаксисом If Then Else
    #37231287
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ципихович Эндрю
Участник
Kyubi, одной строкой можно, только после двоеточий
...
Рейтинг: 0 / 0
25.04.2011, 05:00
| Ответить | Цитировать | Написать  
Помогите с синтаксисом If Then Else
    #37231288
Kyubi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kyubi
Гость
О, спасибо, возьму на вооружение!
...
Рейтинг: 0 / 0
25.04.2011, 05:07
| Ответить | Цитировать | Написать  
Помогите с синтаксисом If Then Else
    #37231527
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
KyubiО, спасибо, возьму на вооружение!
Не надо... возможны проблемы.
...
Рейтинг: 0 / 0
25.04.2011, 10:45
| Ответить | Цитировать | Написать  
Помогите с синтаксисом If Then Else
    #37231546
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
AkinaKyubiО, спасибо, возьму на вооружение!
Не надо... возможны проблемы.
ну-ка ну-ка?
...
Рейтинг: 0 / 0
25.04.2011, 10:51
| Ответить | Цитировать | Написать  
Помогите с синтаксисом If Then Else
    #37231792
скукотища
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
скукотища
Гость
Shocker.Pro,
метка и одноимённая процедура без параметров

Это всё теория, Пух. Но проверить стоит (с)Иа
...
Рейтинг: 0 / 0
25.04.2011, 12:53
| Ответить | Цитировать | Написать  
Помогите с синтаксисом If Then Else
    #37231817
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
скукотищаShocker.Pro,
метка и одноимённая процедура без параметров

Это всё теория, Пух. Но проверить стоит (с)Иа

И где она, проблема?
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Private Sub Command1_Click()

If  1  =  1  Then test: test: test

test:

End Sub
Private Sub test()

Beep

End Sub
...
Рейтинг: 0 / 0
25.04.2011, 13:06
| Ответить | Цитировать | Написать  
Помогите с синтаксисом If Then Else
    #37231878
скукотища
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
скукотища
Гость
Shocker.Pro...И где она, проблема?
Вот
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
Private Sub Command1_Click()

If  1  =  1  Then
test2: test: test
End If

test:


End Sub

Private Sub test(): Beep: End Sub
Private Sub test2(): MsgBox "I'm invisible :(": End Sub
...
Рейтинг: 0 / 0
25.04.2011, 13:21
| Ответить | Цитировать | Написать  
Помогите с синтаксисом If Then Else
    #37231883
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
скукотища,

Ээээ, брось
Оригинальное сообщение:
Ципихович ЭндрюKyubi, одной строкой можно, только после двоеточий
...
Рейтинг: 0 / 0
25.04.2011, 13:23
| Ответить | Цитировать | Написать  
Помогите с синтаксисом If Then Else
    #37231901
скукотища
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
скукотища
Гость
KyubiПодскажите, пожалуйста, как после слова else записать несколько операций с docmd?
Shocker.Pro,
ОК. Подскажи как записать If Then Else с несколькими операторами в каждой ветви в ветви Else одной строкой.
...
Рейтинг: 0 / 0
25.04.2011, 13:26
| Ответить | Цитировать | Написать  
Помогите с синтаксисом If Then Else
    #37231905
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Antonariy
Участник
Да, вопрос первостепенной важности.
Зачем раскладывать себе грабли на дороге?
...
Рейтинг: 0 / 0
25.04.2011, 13:28
| Ответить | Цитировать | Написать  
Помогите с синтаксисом If Then Else
    #37231913
скукотища
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
скукотища
Гость
Shocker.Pro,
чьёрт подьёри! Работает...
Код: plaintext
If <condition> Then <command  1 >: <command  2 > Else <command  1 >: <command  2 >
... слов не осталось, - толко эмоции
...
Рейтинг: 0 / 0
25.04.2011, 13:30
| Ответить | Цитировать | Написать  
Помогите с синтаксисом If Then Else
    #37231915
скукотища
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
скукотища
Гость
AntonariyДа, вопрос первостепенной важности.
Зачем раскладывать себе грабли на дороге?Меня ник обязывает.
...
Рейтинг: 0 / 0
25.04.2011, 13:31
| Ответить | Цитировать | Написать  
Помогите с синтаксисом If Then Else
    #37231922
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
скукотищаОК. Подскажи как записать If Then Else с несколькими операторами в каждой ветви в ветви Else одной строкой.
А в чем проблема?
Код: plaintext
If  1 = 2  Then Beep Else Beep: Beep: Beep
AntonariyДа, вопрос первостепенной важности.
Зачем раскладывать себе грабли на дороге?
А кто раскладывает. Мне пока не показали грабли (правда, это не значит, что их нет) в IF-е (а речь идет именно об IF)
...
Рейтинг: 0 / 0
25.04.2011, 13:33
| Ответить | Цитировать | Написать  
Помогите с синтаксисом If Then Else
    #37231923
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
скукотищаShocker.Pro,
чьёрт подьёри! Работает...
Код: plaintext
If <condition> Then <command  1 >: <command  2 > Else <command  1 >: <command  2 >
... слов не осталось, - толко эмоции

Ник обязывает
Тогда можешь поразвлекаться с вложенными ифами с обеими ветками, причем записывая их в одну строку
...
Рейтинг: 0 / 0
25.04.2011, 13:35
| Ответить | Цитировать | Написать  
Помогите с синтаксисом If Then Else
    #37231936
скукотища
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
скукотища
Гость
Shocker.ProТогда можешь поразвлекаться с вложенными ифами с обеими веткамиНеее. Не люблю макароны в коде.
...
Рейтинг: 0 / 0
25.04.2011, 13:41
| Ответить | Цитировать | Написать  
Помогите с синтаксисом If Then Else
    #37232221
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
скукотищаНе люблю макароны в коде.
...при долгом хранении в макаронах заводятся жуки ))
...
Рейтинг: 0 / 0
25.04.2011, 15:41
| Ответить | Цитировать | Написать  
19 сообщений из 19, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Помогите с синтаксисом If Then Else
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&fpage=103&tid=2158768]:
 0ms
get settings:
 10ms
get forum list:
 14ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 158ms
get topic data:
 11ms
get forum data:
 2ms
get page messages:
 54ms
get tp. blocked users:
 1ms
others: 13ms
total:  271ms
созд. / загр.: 271ms
x
x
Закрыть


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