picturebox vis kun noget

Lav en funktion i stil med flg (bemærk jeg er til c#, så der er sikkert et på småfejl)

private function MakeBmp(SrcBmp as Bitmap, UpperLeft as Point) as Bitmap
  dim b as bitmap
  b = new bitmap(100,100)

  dim g as Graphics
  g = Graphics.FromImage(b)

  Dim rctD as Rectangle
  Dim rctS as Rectangle

  rctD = new Rectangle(0,0,100,100)
  rctS = new Rectangle(UpperLeft.X, UpperLeft.Y, 100,100)

  g.DrawImage(SrcBmp, rctD, rctS, GraphicsUnit.Pixel)

  g.Dispose()

  MakeBmp = b
end function

Virker her :)

Prøv denne hvis du ikke kan få det til at virke:
http://eksperten.dk/spm/524270

har lige et spørgsmål?