Маркер перманентный "Edding 3000", 1,5-3 мм, синий

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 Напишем процедуру подсчета очков при установке маркера в начале игры.
Трехколесный велосипед Funny Jaguar Lexus Racer Trike (цвет: серебро). Детский трехколесный велосипед с колясочной крышей на колесах ПВХ – настоящее спасение для мам с маленькими детьми. Главное место для 3600 руб Раздел: Трехколесные Карандаши цветные "Nuance", 24 цвета. Карандаши цветные. Пластиковый трехгранный корпус. Диаметр грифеля: 3 мм. В наборе: 24 цвета. 404 руб Раздел: 13-24 цвета Мягкий пол универсальный, желтый, 30x30 см (9 деталей). Данный вид напольного покрытия прекрасно совмещается с мягкими полами 60х60 см и ковриком-пазлом «Классики». 9 деталей - 1 кв.м. Пол идет 754 руб Раздел: Прочие
Маркер перманентный "Master", 4.0 мм, синий 46 руб	Маркер перманентный "Lite", 2,5 мм, зеленый 20 руб
Маркер перманентный "CC1118", 3-5 мм, красный Эргономичный корпус изготовлен из пластика. 22 руб	Маркер перманентный "P-70", 1 мм, синий Подходит для письма на любой поверхности, в том числе на CD/DVD диске. 32 руб
Маркер перманентный "EcoLine", 1,5-3 мм, синий Водостойкая и нестираемая практически на всех поверхностях. 63 руб	Маркер перманентный "Beifa", 1,5-2,5 мм, синий Применяется на различных типах поверхностей: бумага, картон, пергамент, дерево, метал, пластик и т. д. Ширина линии письма: 1,5-2,5 мм. Круглый наконечник. Цвет: синий. Водостойкие чернила. Нестираемый. Маркер заправлен перманентными нетоксичными 24 руб
Маркер перманентный (нестираемый) "Lumocolor", скошенный, 2-5 мм, синий Плотный колпачок с клипом надежно предотвращает высыхание. 71 руб	Маркер перманентный, круглый, 1,5-3 мм, чёрный Наконечник круглой (пулевидной) формы. 69 руб
Маркер лаковый Edding "E-791/3", синий (толщина линии 1-2 мм) Не содержат толуола и ксилола. 174 руб	Маркер перманентный "Slim Line", 1 мм, пулевидный острый наконечник, синий Колпачок - с удобным клипом. 16 руб
Маркеры перманентные "XP2", 3-5 мм, 4 цвета Набор перманентных маркеров со скошенным наконечником. 216 руб	Папка 30 вкладышей "Basic", 0.5 мм, синий 94 руб
Маркер для проекторов, 0,3 мм, синий Корпус маркера изготовлен из прочного пластика. 84 руб	Текстмаркер, 1-5 мм, синий 86 руб
Маркер перманентный "OHP", 1,0 мм, черный 34 руб	Мелок универсальный восковой, круглый, 9,5 мм, синий Универсальный мелок на восковой основе используется для нанесения профессиональной маркировки на гладкие и пористые поверхности. 114 руб
Маркер перманентный двусторонний, красный, 4 мм/2 мм 40 руб	Маркер перманентный "200F", черный, 2 мм 35 руб
Маркер перманентный "200B", фиолетовый, 4 мм 33 руб	Маркер перманентный, зеленый, 2,00 мм 28 руб
Маркер перманентный, красный, пулевидный, 1 мм Цвет колпачка соответствует цвету чернил. 31 руб	Маркер перманентный, коричневый, пулевидный, 3 мм Толщина линии - 3 мм. Цвет чернил - коричневый. 34 руб
Маркер "TB Sprint", 1-5 мм, зеленый Маркер предназначен для выделения текста на бумаге любой плотности, в т. ч. факсовой. Цилиндрический корпус. 23 руб	Мормышка вольфрамовая "Кошачий глаз" гвоздик, 1,5 мм, синий (10 штук) 789 руб
Маркер перманентный "Kores", красный, 1 мм Маркер оснащен вентилируемым колпачком, который предотвращает высыхание наконечника. 61 руб	Маркер текстовый "Boss", 2-5 мм, желтый Есть внишутельный запас чернил. 103 руб
Стержень шариковый "Silver", 98 мм, 0,5 мм, синий 48 руб	Роллер "Bionic Worker", 0,5 мм, синий Мягкая, приятная на ощупь поверхность корпуса создает дополнительный комфорт при письме и предотвращает скольжение пальцев. 303 руб
Стержень масляный для шариковой ручки "IBP4120", 0,5 мм, синий 10 руб	Маркер текстовый "ProfyText", 1-5 мм, желтый 50 руб
Маркер текстовый "CityText", 1-5 мм, зеленый 52 руб	Стопор "Цилиндр", 5,5 мм, синий (4 штуки), арт. С196 429 руб
Стержень шариковый "Monaco/Monte Carlo", 0,5 мм, синий 24 руб	Маркер для доски, 2,5 мм, зелёный Чернила на спиртовой основе легко стираются сухой губкой или салфеткой. Насыщенные цвета. Цвет: зеленый. Толщина линии письма: 2,5 мм. Наконечник: круглый. Износоустойчивый круглый наконечник обеспечивает четкую линию и идеальное качество 23 руб
Стержень шариковый "Beifa (Бэйфа)", 125 мм, евронаконечник, узел 0,7 мм, линия 0,5 мм, синий 10 руб	Линер "Scetch", 0,5 мм, синий Ручка-линер обладает ярким дизайном за счет сочетания серого прорезиненного корпуса с бархатистым покрытием и цветных пластиковых элементов, повторяющих цвет чернил. 40 руб
Ручка автоматическая шариковая с грипом "In Black" 0,5 мм, синяя 27 руб	Ручка гелевая с грипом "Vega" 0,5 мм, синяя 15 руб
Ручка автоматическая гелевая с грипом "Efecto" 0,5 мм, синяя 25 руб	Ручка гелевая "Fantasy" 0,5 мм, синяя 15 руб

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