Un modo:
En un módulo .bas:
Option Explicit
'Variable para almacenar la imagen
Private Pic As IPictureDisp
Sub Ubicar_Imagen(Objeto As Object, Path_Imagen As String, _
posic_x As Single, posic_y As Single)
Dim Ancho_IMG As Single 'Ancho de la imagen
Dim Alto_IMG As Single 'Alto de la imagen
Set Pic = LoadPicture(Path_Imagen)
With Objeto
.AutoRedraw = True
.Cls
.ScaleMode = vbPixels
'Pasa el ancho y alto de la imagen a Pixeles
Ancho_IMG = .ScaleX(Pic.Width, vbHimetric, vbPixels)
Alto_IMG = .ScaleY(Pic.Height, vbHimetric, vbPixels)
End With
'Dibuja la imagen
Objeto.PaintPicture Pic, posic_x, posic_y, Ancho_IMG, Alto_IMG
Exit Sub
End Sub
En el form:
Private Sub Form_Load()
'argumentos: form, path de la imagen, posición x, posición y
Call Ubicar_Imagen(Me, "imagen.jpg", x en pixels, y en pixels)
End Sub
Otro modo:
insertar imagen en un picturebox y mover el picturebox dentro del form.