برگزیده های پرشین تولز

کنترل قابل جابجایی

ooje_asman

کاربر تازه وارد
تاریخ عضویت
13 مارس 2005
نوشته‌ها
85
لایک‌ها
0
با سلام من از این کد برای جابجایی فرم استفاده می کردم و با یه کم دستکاری در مورد picbox استفاده می کنم ولی برنامه یه کمی اشکال داره دوستان اگه بتونن کمک کنن ممنون می شم مرسی
Dim newPoint As New System.Drawing.Point
Dim a As Integer
Dim b As Integer

If e.Button = MouseButtons.Left Then
newPoint = Me.MousePosition
newPoint.X = newPoint.X - (a)
newPoint.Y = newPoint.Y - (b)
Me.Location = newPoint
End If
 
بالا