Смена цвета при PSet - VB
Формулировка задачи:
Почему, то что выводит - где Print - так же черного цвета остается ? Как изменить его , как изменить его цвет ?
Листинг программы
- PictureBox.Scale (-10, 10)-(10, -10)
- PictureBox.Line (-10, 0)-(10, 0), vbCyan
- PictureBox.Line (0, -10)-(0, 10), vbCyan
- PictureBox.Line (9.5, 0.2)-(10, 0), vbCyan
- PictureBox.Line -(9.5, -0.2), vbCyan
- PictureBox.PSet (9.5, 1)
- PictureBox.Print "X"
- PictureBox.Line (-0.2, 9.5)-(0, 10), vbCyan
- PictureBox.Line -(0.2, 9.5), vbCyan
- PictureBox.PSet (0.5, 10)
- PictureBox.Print "Y"
Решение задачи: «Смена цвета при PSet»
textual
Листинг программы
- PictureBox.BackColor = 0
- PictureBox.Scale (-11, 11)-(11, -11)
- PictureBox.Line (-10, 0)-(10, 0), vbCyan
- PictureBox.Line (0, -10)-(0, 10), vbCyan
- PictureBox.Line (9.5, 0.2)-(10, 0), vbCyan
- PictureBox.Line -(9.5, -0.2), vbCyan
- PictureBox.PSet (9.5, 1)
- PictureBox.ForeColor = vbYellow
- PictureBox.Print "X"
- PictureBox.Line (-0.2, 9.5)-(0, 10), vbCyan
- PictureBox.Line -(0.2, 9.5), vbCyan
- PictureBox.PSet (0.5, 10)
- PictureBox.ForeColor = vbGreen
- PictureBox.Print "Y"
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
