powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Цикл не работает
5 сообщений из 5, страница 1 из 1
Цикл не работает
    #38121075
Техник55
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Может не совсем лучший выход, но у меня такой цикл:
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
If.........Then
            If..................Then
            ' тогда все нормально, передать ход другим процессам
            DoEvents
             Else  xlsSh.Range("A" & R & ":J" & R).Copy xlsSh1.Range("A" & R & ":J" & R)
            End If
Else
.....................................
.......................................
End if


И вот внутренний цикл неправильно работает и это логично, но как исправить?!!!
...
Рейтинг: 0 / 0
Цикл не работает
    #38121081
Фотография VSVLAD
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Техник55,

Здесь нет циклов
...
Рейтинг: 0 / 0
Цикл не работает
    #38121172
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Техник55как исправить?!!!
Почитать мануал. Попробовать найти там разрешение на запись кода ветки ELSE в той же строке, где и само ключевое слово ELSE, для многострочного IF. Не найти. Исправить код согласно мануалу.
...
Рейтинг: 0 / 0
Цикл не работает
    #38121505
Техник55
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
VSVLAD
Здесь нет циклов
Описался, про условия ветвления имел ввиду...
...
Рейтинг: 0 / 0
Цикл не работает
    #38121518
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Техник55,

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
If условие Then оператор

If условие Then оператор Else оператор

If условие Then
  оператор
End If

If условие Then
  оператор
Else
  оператор
End If
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Цикл не работает
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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