Private Sub PictureBox7_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox7.MouseUp
        If Accessible = True Then


            Dim p As PictureBox = sender




            If p.Left > PictureBox3.Location.X And p.Left < PictureBox3.Location.X + PictureBox3.Size.Width And p.Top > PictureBox3.Location.Y And p.Top < PictureBox3.Location.Y + PictureBox3.Size.Height Then
'??? ??????? ???? ???????? ?? ?????? ?????? ???????               
 p.Location = New Point(176, 66)



            ElseIf p.Left > PictureBox2.Location.X And p.Left < PictureBox2.Location.X + PictureBox2.Size.Width And p.Top > PictureBox2.Location.Y And p.Top < PictureBox2.Location.Y + PictureBox2.Size.Height Then
'??? ??????? ???? ???????? ?????? ?????? ???????               
 p.Location = New Point(296, 66)



            ElseIf p.Left > PictureBox1.Location.X And p.Left < PictureBox1.Location.X + PictureBox1.Size.Width And p.Top > PictureBox1.Location.Y And p.Top < PictureBox1.Location.Y + PictureBox1.Size.Height Then

'??? ??????? ???? ???????? ?????? ?????? ??????               
 p.Location = New Point(418, 66)

            ElseIf p.Left > PictureBox4.Location.X And p.Left < PictureBox4.Location.X + PictureBox4.Size.Width And p.Top > PictureBox4.Location.Y And p.Top < PictureBox4.Location.Y + PictureBox4.Size.Height Then
'??? ??????? ???? ???????? ?????? ?????? ???????               
 p.Location = New Point(53, 66)

            Else
'??? ???????? ?? ????? ?????? ??????? ??????
                p.Location = New Point(296, 364)


            End If
        End If
    End Sub

    Private Sub PictureBox6_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox6.MouseUp
        If Accessible = True Then


            Dim p As PictureBox = sender
            '  ??? ???? ??? ??? ??? ?????? ??? ?????? ?? ??? ??????

            If p.Left > PictureBox3.Location.X And p.Left < PictureBox3.Location.X + PictureBox3.Size.Width And p.Top > PictureBox3.Location.Y And p.Top < PictureBox3.Location.Y + PictureBox3.Size.Height Then
                p.Location = New Point(176, 66)

            ElseIf p.Left > PictureBox2.Location.X And p.Left < PictureBox2.Location.X + PictureBox2.Size.Width And p.Top > PictureBox2.Location.Y And p.Top < PictureBox2.Location.Y + PictureBox2.Size.Height Then
                p.Location = New Point(296, 66)

            ElseIf p.Left > PictureBox1.Location.X And p.Left < PictureBox1.Location.X + PictureBox1.Size.Width And p.Top > PictureBox1.Location.Y And p.Top < PictureBox1.Location.Y + PictureBox1.Size.Height Then
                p.Location = New Point(418, 66)


            ElseIf p.Left > PictureBox4.Location.X And p.Left < PictureBox4.Location.X + PictureBox4.Size.Width And p.Top > PictureBox4.Location.Y And p.Top < PictureBox4.Location.Y + PictureBox4.Size.Height Then
                p.Location = New Point(53, 66)

            Else
                p.Location = New Point(418, 364)
               

            End If

        End If

    End Sub
????? ???? ?????