Например так по кнопке при открытом виде
av.GetActiveDoc.GetWin.Resize (500,500)
или в расширенной версии
aView = av.GetActiveDoc ' получить вид
aDocWin = aView.GetWin ' получить окно вида
aDocWin.Resize (300, 300) ' изменить размеры окна вида
Смотрите справку по DocWin, там можно менять не только размеры, но и многое другое.
