Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
яАРтеМоНкА
13.11.2021 00:12 •
Информатика
Создать программный проект, на котором задана горизонтальная полоса из четырёх квадратов, при нажатии кнопки будет появляться вертикальная полоса. (написать на visual basic)
Показать ответ
Ответ:
Pelageya2091
20.07.2020 21:29
Private Sub Command1_Click()
Form1.Shape1.Visible = True
Form1.Shape2.Visible = True
Form1.Shape3.Visible = True
Form1.Shape4.Visible = True
Form1.Shape5.Visible = Falce
Form1.Shape6.Visible = Falce
Form1.Shape7.Visible = Falce
Form1.Shape8.Visible = Falce
End Sub
Private Sub Command2_Click()
Form1.Shape5.Visible = True
Form1.Shape6.Visible = True
Form1.Shape7.Visible = True
Form1.Shape8.Visible = True
Form1.Shape1.Visible = Falce
Form1.Shape2.Visible = Falce
Form1.Shape3.Visible = Falce
Form1.Shape4.Visible = Falce
End Sub
0,0
(0 оценок)
Популярные вопросы: Информатика
esken576
16.02.2020 02:10
Решить : ) даны два числа если их произведение отрицательно то увеличить его в 2 раза иначе уменьшить в 1,5 раз...
2003mariasMaria
08.02.2022 20:39
По информатике в экселе как определить доходность если дана формула =(1+j/m)^m-1...
pughluy
10.01.2022 09:10
Найдите в таблице слова и термины по теме : негативные аспекты использования компьютера...
vikagevorgiz
07.03.2023 05:58
1. Відомо ряд натуральних чисел від n до m. Обчислити добуток парних чисел. 2. Відомо ряд натуральних чисел від 50 до 100. Обчислити кількість тих чисел, що діляться на...
Ксенияkek
11.06.2022 16:19
с информатикой с 6 и 7...
valeria276
09.09.2022 00:59
Лінійний Повторення Розгалуження Складання розкладу дня | Вибір одягу для прогулянки | Готуй сани влітку, а воза взимку Підйом сходами | Перехід через перехрестя | Ліплення...
Диляра20082107
20.06.2021 02:41
Дайте определение: Базы данных - это ... а) определенная совокупность информации; б) произвольный набор данных; в) совокупность связанной информации, объединенной по определенному...
asimagasanova
30.04.2023 01:37
Чому дорівнює змінна S після виконання фрагменту програми: S:=1;for i:=1 to 5 do S:=S+3; До ть будь-ласка!!...
Ларейн2772
04.01.2023 20:04
Чому дорівнює значення y після виконання оператора, якщо х=3? If x 0 Тhen y:= x+23 Else у:=х*23; До ть будь-ласка!!...
jf7yyf
25.12.2021 13:44
Який буде результатвиконання алгоритму принаступних змінниха a=14; В=2;c=8; d=7 *початокВвести значенняX:= a-by:= C-d2:= x*уВивести значення 2кінецьО1712231...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Form1.Shape1.Visible = True
Form1.Shape2.Visible = True
Form1.Shape3.Visible = True
Form1.Shape4.Visible = True
Form1.Shape5.Visible = Falce
Form1.Shape6.Visible = Falce
Form1.Shape7.Visible = Falce
Form1.Shape8.Visible = Falce
End Sub
Private Sub Command2_Click()
Form1.Shape5.Visible = True
Form1.Shape6.Visible = True
Form1.Shape7.Visible = True
Form1.Shape8.Visible = True
Form1.Shape1.Visible = Falce
Form1.Shape2.Visible = Falce
Form1.Shape3.Visible = Falce
Form1.Shape4.Visible = Falce
End Sub