Inconsistent results with Marshal.ReadInt32.

Sub SpeedStitchTest()
        Drawn = False
 
        bmpData = bmpMap.LockBits(New Rectangle(0, 0, bmpMap.Width, bmpMap.Height), Imaging.ImageLockMode.ReadWrite, Imaging.PixelFormat.Format32bppPArgb)
 
        Dim data As BitmapData = bmpImage.LockBits(New Rectangle(0, 0, bmpImage.Width, bmpImage.Height), ImageLockMode.ReadOnly, PixelFormat.Format32bppPArgb)
        Dim AlphaInt As Int32 = Alpha.ToArgb
        Dim ImageColorInt As Int32 = 0
        Dim MapColorInt As Int32 = 0
 
        Dim ShortCircuit As Boolean = False
 
        Dim sw As Stopwatch = Stopwatch.StartNew
 
        For CanvasY = 0 To bmpMap.Height - bmpImage.Height
            For CanvasX = 0 To bmpMap.Width - bmpImage.Width
 
                If Drawn Then
                    Exit For
                End If
 
                MatchCount = 0
                PixelCount = bmpImage.Width * bmpImage.Height
 
                For nY = 0 To bmpImage.Height - 1
                    If ShortCircuit Then
                        ShortCircuit = False
                        Exit For
                    End If
 
                    For nX = 0 To bmpImage.Width - 1
 
                        ' Read image pixel.
                        ImageColorInt = Marshal.ReadInt32(data.Scan0, (data.Stride * nY) + (4 * nX))
 
                        ' Discount alpha pixels.
                        If ImageColorInt = AlphaInt Then
                            PixelCount -= 1
                        Else
                            ' Read map pixel.
                            MapColorInt = Marshal.ReadInt32(bmpData.Scan0, (bmpData.Stride * (CanvasY + nY)) + ((CanvasX + nX) * 4))
 
                            ' Discount alpha pixels.
                            If MapColorInt = AlphaInt Then
                                PixelCount -= 1
                            Else
                                ' If the pixels match, increase the match count.
                                If ImageColorInt = MapColorInt Then
                                    MatchCount += 1
                                Else
                                    ShortCircuit = True
                                End If
                            End If
                        End If
 
                    Next
                Next
 
                ' Check the match %.
                HighestMatch = Math.Max(HighestMatch, (MatchCount / PixelCount) * 100)
            Next
        Next
 
        MessageBox.Show(CStr(sw.ElapsedMilliseconds))
        MessageBox.Show(CStr(HighestMatch))
 
        HighestMatch = 0
        bmpImage.UnlockBits(data)
        bmpMap.UnlockBits(bmpData)
 
    End Sub