Hola cucaracha.
Para hacerlo sencillo supongo una región a 'borrar' rectangular y uso un picture box como origen para copiar, Imagina algo así:
Un PictureBox llamado Picture1 con su correspondiente imagen. Otro PictureBox llamado Picture2 sin picture cargado y con el color de fondo que desees que aparezca en el lugar 'recortado'.
Option Explicit
Private Declare Function BitBlt Lib "gdi32" (ByVal hDestDC As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal dwRop As Long) As Long
Public Sub Borrar()
Dim lngRc
lngRc = BitBlt(Picture1.hdc, 10, 10, 100, 100, Picture2.hdc, 1, 1, &HCC0020)
Picture1.Refresh
End Sub
Suerte.
