Tamaño de Forms dependiendo de Resolucion

[Jose_minglein2]

Dim original As New Drawing.Bitmap(path) ' path es la ruta de tu image de 1024 x 768, (da igual el formato, jpg, bmp...
Dim fondo As New System.Drawing.Bitmap(original, 800, 600)
Me.BackgroundImage = fondo

Pruebalo y me cuentas.