Esempio:
codice:Dim immagine As New Bitmap(1000, 800) Dim gr As Graphics = Graphics.FromImage(immagine) gr.Clear(Color.Red) Dim sfondo As New Bitmap(1000, 1000) Dim gr1 As Graphics = Graphics.FromImage(sfondo) gr1.Clear(Color.Green) Dim x As Integer = (sfondo.Width - immagine.Width) / 2 Dim y As Integer = (sfondo.Height - immagine.Height) / 2 gr1.DrawImage(immagine, x, y) PictureBox1.Image = sfondo![]()