СообЧа > База Знаний > Программирование > Visual Basic > Формы и элементы управления

Вопрос

Как в MDI-форме кодом переключиться на следующее окно?

Ответ

Все формы помещаются в коллекцию по порядку создания.
От этого и пляши. Например, создай Public переменную, храни в ней номер активной формы, и пиши:

Forms(iActiveForm+1).SetFocus.
If iActiveForm=Forms.Count Then
    iActiveForm=1 ' первая будет MDI-форма, если она у тебя стартовая.
Else
   iActiveForm=iActiveForm+1
End If

А если в проекте помимо MDIChild форм открываются обычные формы, то можно еще добавить проверку, типа:

IF Forms(iActiveForm+1).mdichild then
    'Переходим на след. child-форму
    …
END IF

Из конференции VB



Copyright © 2000-2004 Сообщество Чайников
Контактная информация