vb.net check if two rectangles overlap

Public Shared Function overlappingRectangles(ByVal R1 As Rectangle, ByVal R2 As Rectangle) As Boolean
            If R1.X > (R2.X + R2.Width) Or (R1.X + R1.Width) < R2.X Then
                Return False
            End If
            If R1.Y > (R2.Y + R2.Height) Or (R1.Y + R1.Height) < R2.Y Then
                Return False
            End If
            Return True
        End Function

Dim R1 As New Rectangle(0, 0, 10, 10)
        Dim R2 As New Rectangle(-8, -5, 300, 200)

        Dim Bool2 As Boolean = Aeye.overlappingRectangles(R1, R2)

        MessageBox.Show(CStr(Bool2))