![]() |
![]() |
||
|
![]() |
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 Напишем процедуру подсчета очков при установке маркера в начале игры. | |
![]() Материал: пластик. Ширина: 29 см. Длина: 35 см. Высота: 22,5 см. 340 руб Раздел: Корзины для стеллажей ![]() Чайник. Размер: 21,5x12x17 см. Объем: 1050 мл. Материал: керамика. 389 руб Раздел: Чайники заварочные ![]() Кухня для кукольного домика состоит из: плиты с раковиной в сборе; холодильника; подставки стола в сборе; стойки стула в сборе, сиденья 886 руб Раздел: Кухни, столовые | ![]() 72 руб | ![]() 34 руб |
![]() 25 руб | ![]() 45 руб |
![]() Моментально высыхает. 15 руб | ![]() 40 руб |
![]() 26 руб | ![]() Длительность письма Maxfilo в 4 раза превышает обычные маркеры и обеспечивает безупречно яркие надписи! 136 руб |
![]() 66 руб | ![]() 21 руб |
![]() 25 руб | ![]() 20 руб |
![]() 22 руб | ![]() Рабочая температура до -70 градусов С. Толщина линии: 4-12 мм. Маркер с круглым наконечником в металлической оправе. 265 руб |
![]() 24 руб | ![]() 48 руб |
![]() 116 руб | ![]() 300 руб |
![]() 21 руб | ![]() 26 руб |
![]() 38 руб | ![]() Является термостойким маркером (маркировка выдерживает нагрев до 480 С). Благодаря металлическому корпусу можно работать в любых (даже сложных) условиях. Цвет: синий. Корпус: металлический. С помощь перманентного маркера с круглым наконечником 121 руб |
![]() 31 руб | ![]() 37 руб |
![]() 29 руб | ![]() Ширина линии - 2 мм. Толщина линии: 2 мм Форма наконечника: пулевидный. Кол-во пишущих узлов: 1. Благодаря спиртовой основе, чернила после нанесения быстро высыхают и не стираются. 27 руб |
![]() 45 руб | ![]() 37 руб |
![]() Диаметр корпуса – 11,7 мм. Материал корпуса – пластик. 22 руб | ![]() Эргономичный корпус изготовлен из пластика. 22 руб |
![]() 32 руб | ![]() Подходит для письма на бумаге, металле, стекле и пластике. Цвет чернил: синий. Пишущий узел: 2-3 мм. Маркер перманентный. 33 руб |
![]() Колпачок - с удобным клипом. 16 руб | ![]() Фетровый наконечник характеризуется повышенной износостойкостью. Цвет: синий. Толщина линии письма: 2,5 мм. Наконечник: круглый. Простой и надежный маркер для повседневного использования. 20 руб |
![]() Подходит для письма на любой поверхности, в том числе на CD/DVD диске. 32 руб | ![]() Плотный колпачок с клипом надежно предотвращает высыхание. 71 руб |
![]() 84 руб | ![]() 20 руб |
![]() 73 руб -14% 62 руб | ![]() Пулеобразный наконечник. Диаметр стержня 4. 5 мм. Маркер перманентный Maxfilo с жидкими чернилами и кнопкой подкачки чернил. 155 руб |
на главную |