Conversion de Bitmap en RVB dans VB

Question

Veuillez voir le code attatched ci-dessous. J'ai réussi à prendre une capture d'écran de mon ordinateur en utilisant VB et je l'ai stocké sous forme de bitmap. Je veux convertir ce bitmap (rapidement!) En un tableau de valeurs rgb.

Un code simple qui peut faire cela?

Vive Martin

' Capture screen code 
Dim bounds As Rectangle 
Dim screenshot As System.Drawing.Bitmap 
Dim graph As Graphics 
bounds = Screen.PrimaryScreen.Bounds 
screenshot = New System.Drawing.Bitmap(bounds.Width, bounds.Height, System.Drawing.Imaging.PixelFormat.Format32bppRgb) 
graph = Graphics.FromImage(screenshot) 
graph.CopyFromScreen(bounds.X, bounds.Y, 0, 0, bounds.Size, CopyPixelOperation.SourceCopy) 

' Display the captured image 
Display.Image = screenshot 

Answer 1

Un exemple est dans la documentation Bitmap.LockBits: http://msdn.microsoft.com/en-us/library/5ey6h79d.aspx#Y856