Вопрос
Как в 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 Сообщество Чайников
Контактная информация