Me respondo yo mismo:
Para pasar desde metafila a bitmap he hecho lo siguiente:
Código:
Dim bmi As New Bitmap(Me.Width, Me.Height)
Dim gr As Graphics = Graphics.FromImage(bmi)
If Not mf Is Nothing Then
gr.DrawImage(mf, 0, 0, bmi.Width, bmi.Height)
e.Graphics.Clear(Me.BackColor)
e.Graphics.DrawImage(bmi, 0, 0)
If mfr Is Nothing Then
SetRegion(bmi)
End If
End If
Esto es para mostrarlo en pantalla. El sub SetRegion utiliza el bitmap para crear la region del formulario. La pega: Es lentisimo... hay que recorrer todos los pixeles, si alguien sabe otra forma, muy agradecido.