VB - Die Farbe eines Pixels in einer Windows Form abfragen

Private Function GetPixelAtPoint(ByVal Ctrl As System.Windows.Forms.Control, ByVal Location As System.Drawing.Point) As Color
  Dim TmpImg As New Bitmap(Ctrl.ClientSize.Width, Ctrl.ClientSize.Height)
  Ctrl.DrawToBitmap(TmpImg, Ctrl.ClientRectangle)
  Return TmpImg.GetPixel(Location.X, Location.Y)
End Function