![]() |
![]() |
||
|
![]() |
Visual Basic Создадим переменную markersave в которой будем запоминать НОМЕР ЭЛЕМЕНТА массива savecolor(j), которая соответствует ячейке с маркером (в которую поставили маркер). Можно проверить, что маркер возможно поставить только в одну ячейку. Теперь нужно обеспечить сохранение маркера (окраску ячейки в синий цвет) при сдвигании ячеек сверху-вниз. Процедура восстановления цвета маркера после смещения ячеек игрового поля сверху-вниз: Priva e Sub Marker Rese () If markersave = 0 he Label7.BackColor = &HFF0000 If markersave = 1 he Label8.BackColor = &HFF0000 If markersave = 2 he Label9.BackColor = &HFF0000 If markersave = 3 he Label10.BackColor = &HFF0000 If markersave = 4 he Label11.BackColor = &HFF0000 If markersave = 5 he Label12.BackColor = &HFF0000 If markersave = 6 he Label13.BackColor = &HFF0000 If markersave = 7 he Label14.BackColor = &HFF0000 E d Sub Теперь «подключим» процедуру Marker Rese () к работе в процедуре сдвига вниз. В самый низ процедуры Frame1 Click() вставим следующий код (выделен красным цветом): Priva e Sub Frame1 Click() um Move 'Сдвинуть значения всех строк на одну вниз Up S r App 'Заполнить верхнюю строку новыми номиналами Marker Rese 'Восстановить маркер E d Sub Полный VB-проект с этого этапа разработки игры - в файле vbg5.zip Напишем процедуру подсчета очков при установке маркера в начале игры. | |
![]() Порошок устраняет самые трудновыводимые и застарелые пищевые и технические пятна и убивает бактерии, делая белье идеально чистым. 353 руб Раздел: Стиральные порошки ![]() Пирог в лицо - это оригинальная игра, которая станет изюминкой любой вечеринки не только для детей, но и взрослых! Использовать можно не 910 руб Раздел: Игры на ловкость | ![]() Толщина линии – 1,5 мм. Основа – спиртовая. Форма наконечника – пулевидный. 31 руб | ![]() Подходит для письма на любых поверхностях. 31 руб |
![]() Толщина линии - 3 мм. Цвет чернил - зеленый. 36 руб | ![]() 35 руб |
![]() Наличие клипа – есть. 31 руб | ![]() Форма корпуса – круглая. 31 руб |
![]() Предназначен для письма на любой поверхности. 20 руб | ![]() 23 руб |
![]() Клинообразный пишущий узел. 31 руб | ![]() 22 руб |
![]() 48 руб | ![]() 40 руб |
![]() 54 руб | ![]() 53 руб |
![]() Предназначен для письма на любой поверхности. 20 руб | ![]() 34 руб |
![]() Благодаря спиртовой основе, чернила после нанесения быстро высыхают и не стираются. 49 руб | ![]() Толщина линии - 0,7-1,0 мм. Диаметр корпуса - 11,6 мм. Материал корпуса - пластик. 30 руб |
![]() 34 руб | ![]() 40 руб |
![]() 62 руб | ![]() 34 руб |
![]() 29 руб | ![]() 23 руб |
![]() 26 руб | ![]() Комфортная модель большой емкости "Power" с широким скошенным наконечником. 143 руб |
![]() 29 руб | ![]() 30 руб |
![]() Маркер оснащен вентилируемым колпачком, который предотвращает высыхание наконечника. 61 руб | ![]() Наличие клипа – есть. 26 руб |
![]() Форма корпуса – круглая. 22 руб | ![]() Пулевидный наконечник 3 мм. Цвет: черный. Маркер подходит для использования на различных поверхностях: картоне, стекле, керамике, дереве, резине, пластике. 25 руб |
![]() Надписи мгновенно высыхают и не размазываются. 72 руб | ![]() Диаметр корпуса - 11,7 мм. Форма корпуса - круглая. Основа - спиртовая. Материал корпуса - пластик. 26 руб |
![]() Толщина линии - 0,7-1,0 мм. Диаметр корпуса - 11,6 мм. Материал корпуса - пластик. 29 руб | ![]() Диаметр корпуса - 14 мм. Материал корпуса - пластик. 59 руб |
![]() Наличие клипа - есть. 97 руб | ![]() Подходит для письма на любой поверхности, в том числе на CD/DVD диске. 32 руб |
![]() Пишет практически на всех поверхностях. . Чернила имеют высокую водостойкость, светостойкость и морозостойкость, мгновенно высыхают, не размазываются. Цвет чернил: зеленый. Минимальная толщина линии письма: 1,5 мм. Максимальная толщина линии 78 руб | ![]() 22 руб |
на главную |