При выполнении первого условия идёт проверка второго. Если второе условие выполняется, то Return. Если первое условие не выполняется, то end if. Если второе условие не выполняется, то end if.ksv68 писал(а):функция где?
Код: Выделить всё
If Keynim = 0 And Key = 0 Then
...
End If
Ну, теоретичски:ksv68 писал(а):а в одну строку можно написать?
Код: Выделить всё
If Keynim = 0 and Key = 0 then Return
В вашем варианте можно несколько действий добавить при выполнении условий.edm2007 писал(а):Так тоже можно.
Большое спасибо, с комментариями конечно поленился и сам начинаю путать , чего зачем . Залил в железо и как всегда первая неудача, работает только индикатор, кнопки молчат, хотя в протеусе все ОК. Вывел на дисплей переменную Key, что читается с порта с кнопками и 255 или бегают цифры, наверное наводка, хотя прога предыдущая (в флов коде написанная) работала, хотя я там читал только 4 бита. Странно, протеус показывает на экране одно (код 30) те 4 бита и есть , а в железе другое (код 255) ???edm2007 писал(а): Ни единого комментария в коде.