RE:Mantener Tamaño de forms
Mete esto en un modulo
Declare Function glrMoveWindows Lib "user32" Alias "MoveWindow" (ByVal hwnd As Long, ByVal X As Long, ByVal Y As Long, ByVal nWindth As Long, ByVal nHeight As Long, ByVal bRepair As Long) As Long
y esto otro en cada formulario, cambiando por supuesto a tus necesidades
Dim PosForm As String
285 es el margen izquierdo
50 es el margen superior
440 es el alto
510 es el ancho
PosForm = glrMoveWindows(Me.hwnd, 285, 50, 440, 510, True)
Saludos.