Рисование резиновых линий на неактивной форме - 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
                        