Hola amigos a ver si me ayudan con esto estoy queriendo crear controles en tiempo de ejecución y ordenarlo aca dejo un screen como me va quedando pero este solo me crea asi: 
  
 
no lo puedo bajar hacia abajo. 
Asi es como quiero que salga: 
  ESTE ES MI CODIGO   
Código:
 Private Sub cmdCrear_Click()
    
    Dim i As Integer
    For i = 1 To 4
        Load Command1(i)
        Command1(i).Left = Command1(i - 1).Left + Command1(i).Width
        Command1(i).Visible = True
    Next
    
End Sub