Маркер перманентный "Flagman", 2 мм, пулевидный наконечник, синий

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 Напишем процедуру подсчета очков при установке маркера в начале игры.

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 Напишем процедуру подсчета очков при установке маркера в начале игры.
Глобус "ELITE", двойная карта, диаметр 30 см, новая карта, подсветка. Диаметр: 30 см. Двойная русифицированная физическая/политическая карта мира. Внутренняя подсветка. Утяжеленная подставка. Прозрачный 2831 руб Раздел: Глобусы Комплект универсальных обложек с липким слоем, 470x300 мм, 25 штук. Обложки универсальные с липким слоем, 25 штук, размер 470x300 мм. Материала обложек: полипропилен. Плотность: 80 мкм. 360 руб Раздел: Обложки для книг Фоторамка "Poster gold" (30х40 см). Фоторамка для фотографий размером: 30х40 см. Может располагаться как вертикально, так и горизонтально, на подставке. Есть настенные 321 руб Раздел: Размер 30x40
Маркер перманентный "Stabilo. Mark", пулевидный наконечник 1,5-2,5 мм, розовый Возможно использование на борту самолета. Форма корпуса: круглая. Диаметр корпуса: 14 мм. Материал корпуса: РР. Основа чернил: спиртовая. Быстросохнущие чернила. 78 руб	Маркер перманентный двусторонний зеленый, пулевидный, 4 мм/2 мм 40 руб
Маркер перманентный двухсторонний, зеленый, пулевидный, 0,8-2,2 мм 27 руб	Маркер перманентный "8510", красный, пулевидный, 2,5 мм Круглый пишущий наконечник, ширина линии письма 2,5 мм, пишет на бумаге, картоне, дереве, металле, пластмассе, стекле, керамике и камне. 33 руб
Маркер перманентный двусторонний, красный, пулевидный, 0,5-1 мм Подходит для использования на большинстве поверхностей, включая прозрачный пластик - не растекается. Цвет: красный. Тип чернил: спиртовая основа. Форма наконечника: пулевидный. Кол-во пишущих узлов: 2. Двусторонний перманентный маркер Berlingo 30 руб	Маркер перманентный "250", зеленый, пулевидный, 1-3 мм Наличие клипа – есть. 26 руб
Маркер перманентный, 2 мм, синий 40 руб	Маркер для досок "BM241", клиновидный наконечник, синий 53 руб
Маркер перманентный "Sway", черный, пулевидный 34 руб	Маркер перманентный "Slim Line", 1 мм, пулевидный острый наконечник, синий Колпачок - с удобным клипом. 16 руб
Маркер перманентный "MAR411/3", со скошенным наконечником, 1-5 мм, синий Является термостойким маркером (маркировка выдерживает нагрев до 480 С). Благодаря металлическому корпусу можно работать в любых (даже сложных) условиях. Цвет: синий. Корпус: металлический. С помощь перманентного маркера со скошенным наконечником 125 руб	Маркер перманентный, синий, пулевидный, 2 мм Плотный колпачок с клипом надежно предотвращает высыхание. 37 руб
Маркер перманентный "P-505-F", синий, пулевидный, 1 мм 29 руб	Маркер перманентный, двусторонний, синий, пулевидный, 0,5-1 мм 30 руб
Маркер перманентный "100", синий, пулевидный, 1-2 мм Диаметр корпуса – 11,7 мм. Материал корпуса – пластик. 22 руб	Маркер перманентный "Luxor", двухсторонний, синий, пулевидный, 0,7/1 мм Толщина линии - 0,7-1,0 мм. Диаметр корпуса - 11,6 мм. Материал корпуса - пластик. 29 руб
Маркер перманентный (нестираемый) "Laco (Лако)", круглый наконечник, 3 мм, синий Водостойкие чернила. 45 руб	Маркер перманентный "EcoLine", 1,5-3 мм, синий Водостойкая и нестираемая практически на всех поверхностях. 63 руб
Маркер перманентный "Sharpie Twin Tip", синий, 1,0 мм 148 руб	Маркер перманентный, круглый наконечник 1-3 мм, черный 19 руб
Маркер перманентный двусторонний, синий, 4 мм/2 мм 40 руб	Маркер перманентный "PER-2400B", синий, 4 мм 45 руб
Маркер перманентный "MAR482B/2", с круглым наконечником, 1-3 мм, красный 72 руб	Маркер перманентный, круглый наконечник, 2,5 мм, зеленый Маркеры прекрасно пишут на металле, пластмассе, стекле, керамике, дереве, картоне и бумаге. 26 руб
Маркер перманентный "Intens", 1-3 мм, синий 38 руб	Маркер перманентный, зеленый, пулевидный, 2 мм Чернила на спиртовой основе. 37 руб
Маркер перманентный "8004 OfficeSpace", синий, 2 мм Чернила на спиртовой основе. 20 руб	Маркер перманентный, черный, пулевидный, 3 мм Заправлен водостойкими чернилами на спиртовой основе, которые после нанесения быстро высыхают и не стираются. 36 руб
Маркер перманентный "Twin Tip", двухсторонний, 2-4 мм, цвет синий, 12 штук (количество товаров в комплекте: 1040 руб	Маркер перманентный, красный, пулевидный, 1,5 мм Толщина линии – 1,5 мм. Основа – спиртовая. Форма наконечника – пулевидный. 31 руб
Маркер перманентный, фиолетовый, пулевидный, 1,5 мм Перманентный маркер для письма по бумаге, металлу, пластику, керамике, коже и другим поверхностям. 31 руб	Маркер перманентный "Lite", 2,5 мм, синий 20 руб
Маркер перманентный "Edding 300", 1,5-3 мм, синий Чернила маркера практически без запаха. 69 руб	Маркер перманентный "Slender", круглый наконечник, 1 мм, зеленый Изящный тонкий корпус. 23 руб
Маркер перманентный, круглый наконечник, фиолетовый, 2,5 мм Толщина наконечника: 5 мм. Ширина линии письма: 2,5 мм. Цвет: фиолетовый. Круглый пишущий узел. 31 руб	Маркер-краска "Spectrum", пулевидный наконечник, золото, 2 мм 59 руб
Маркер перманентный "Maxx 220 S", черный, пулевидный, 0,4 мм Форма корпуса - круглая. 88 руб	Маркер перманентный "Maxx 220 S", синий, 4 мм Универсальный перманентный маркер. 88 руб
Маркер перманентный (нестираемый) "Laco (Лако)", круглый наконечник, 3 мм, черный Маркер заправлен перманентными нетоксичными чернилами. 48 руб	Маркер перманентный (нестираемый) "Grip", 1,5-3 мм, круглый наконечник, черный Высококачественный маркер. 142 руб

		есть на складе