Таскание формы за элемент

[Adiost]

etc
Неправда D:<

Tanya
Премного благодарю
Работает.

 

[BStudio]

Me.Top
Me.Left

Не знаю как на MS Visual Basic'e, нo на Visual Studio, по-моему будет удобнее и практичнее использовать

Me.Location = New Point(Me.Location.X + (e.X - BarX), Me.Location.Y + (e.Y - BarY))