Ver Mensaje Individual
  #2 (permalink)  
Antiguo 02/01/2004, 20:07
Avatar de pabli
pabli
 
Fecha de Ingreso: octubre-2003
Mensajes: 381
Antigüedad: 21 años, 1 mes
Puntos: 0
RsOfT,

este procedimiento te sirve para cualquier control:

Sub SUB_Centrar_Control(MiForm As Form, MiControl As Control)

'Calculamos la altura a mostrar el control
MiControl.Top = (MiForm.Height - MiControl.Height) / 2

'Calculamos la dimension del control a mostrar
MiControl.Left = (MiForm.Width - MiControl.Width) / 2
End Sub

Saludos
Pablo