Создать программный проект, на котором задана горизонтальная полоса из четырёх квадратов, при нажатии кнопки будет появляться вертикальная полоса.

(Написать на Visual Basic)

Question

Информатика

Палуня

6 июня, 04:11

Создать программный проект, на котором задана горизонтальная полоса из четырёх квадратов, при нажатии кнопки будет появляться вертикальная полоса.

(Написать на Visual Basic)

+2

Ответы (1)

Знаете ответ?

Петаня · Answer 1

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