Гость
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Цикл не работает / 5 сообщений из 5, страница 1 из 1
23.01.2013, 12:11
    #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
23.01.2013, 12:13
    #38121081
VSVLAD
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Цикл не работает
Техник55,

Здесь нет циклов
...
Рейтинг: 0 / 0
23.01.2013, 12:43
    #38121172
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Цикл не работает
Техник55как исправить?!!!
Почитать мануал. Попробовать найти там разрешение на запись кода ветки ELSE в той же строке, где и само ключевое слово ELSE, для многострочного IF. Не найти. Исправить код согласно мануалу.
...
Рейтинг: 0 / 0
23.01.2013, 14:52
    #38121505
Техник55
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Цикл не работает
VSVLAD
Здесь нет циклов
Описался, про условия ветвления имел ввиду...
...
Рейтинг: 0 / 0
23.01.2013, 14:59
    #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
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Цикл не работает / 5 сообщений из 5, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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