Рисование резиновых линий на неактивной форме - VB
Формулировка задачи:
прошу прощения, никак не могу решить задачу:
есть форма, на ней - Picture1
как сделать так, чтобы при проходе курсора мыши над этой НЕАКТИВНОЙ формой из каждого угла Picture1 тянулись линии к указателю мышки
---
понимаю: правильно заданный вопрос - половина ответа, но по другому объяснить не могу
---
очень прошу помощи, желательно с примером
спасибо
Решение задачи: «Рисование резиновых линий на неактивной форме»
textual
Листинг программы
- Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
- With Picture1
- .Cls
- Picture1.Line (0, 0)-(X, Y)
- Picture1.Line (.Width, 0)-(X, Y)
- Picture1.Line (.Width, .Height)-(X, Y)
- Picture1.Line (0, .Height)-(X, Y)
- End With
- End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
