Centrar imagen formulario
Hola foro. Tengo un bmp que quiero que sea la imagen de fondo de mi formulario principal (MDIForm). Como puedo hacer para que salga centrada y no alineada arriba a la izquierda? Gracias!
Prueba con este código:
Private Sub Form_Activate()
Dim pic As StdPicture
Me.ScaleMode = 3
Me.AutoRedraw = True
Set pic = LoadPicture(MiImagen)
Me.PaintPicture pic, (Me.ScaleWidth - pic.Width / 26.45) / 2, (Me.ScaleHeight - pic.Height / 26.45) / 2
End Sub
Saludos!!
l_island
Private Sub Form_Activate()
Dim pic As StdPicture
Me.ScaleMode = 3
Me.AutoRedraw = True
Set pic = LoadPicture(MiImagen)
Me.PaintPicture pic, (Me.ScaleWidth - pic.Width / 26.45) / 2, (Me.ScaleHeight - pic.Height / 26.45) / 2
End Sub
Saludos!!
l_island
