استاذ Ahmed_Mansoor
والله انا محير من المرفق الذي ارسلته لي
حيث ان هناك كود و هو كالاتي
Private Sub Label1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)²
If Label1.Left < Label2.Left) And _² )
Label1.Left + Label1.Width) > (Label2.Left + Label2.Width) And _² )
Label1.Top > Label2.Top And
Label1.Top + Label1.Height) < (Label2.Top + Label2.Height) Then)
Label1.BorderStyle = 1
Exit Sub
End If
الي محيرني اني لو جمعت قيم اللايبل 1 و اللايبل2 تكون النتيجة كالاتي
'left 120 < 3960
'top+width :615 > 4035
'top: 120>960
'top+hight :375<1395
اتمتى ان تكون قد فهمت ما اصبو اليه
(ملاحظة : لقد وضعت هذا الرمز "²" حتى تكون كتابة الكود صحيحة في الرد فقط و لم اضعها اثناء كتابة الكود في البرنامج)