Нарисовать треугольник - VB

Узнай цену своей работы

Формулировка задачи:

Имеется Picture2, как нарисовать в нем треугольник ?

Решение задачи: «Нарисовать треугольник»

textual
Листинг программы
d = 1000
XP = (Picture2.Width - d) / 2
YP = (Picture2.Height + 2 * d / 3) / 2
FillStyle = 0
 
Picture2.Line (XP, YP)-(XP + d, YP), vbBlack
Picture2.Line (XP + d, YP)-(XP + d / 2, YP / 2), vbBlack
Picture2.Line (XP + d / 2, YP / 2)-(XP, YP), vbBlack

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

7   голосов , оценка 4.143 из 5
Похожие ответы