Не получается форме присвоитъ MdiParent

Язык Visual Basic на платформе .NET.

Модераторы: Ramzes, Sebas

AndreyG_80
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 169
Зарегистрирован: 10.03.2006 (Пт) 13:27

Не получается форме присвоитъ MdiParent

Сообщение AndreyG_80 » 08.07.2007 (Вс) 11:46

Пишу следующий код:
Код: Выделить всё
Public frmFilter As System.Windows.Forms.Form

frmFilter = New frmFilter
frmFilter.MdiParent = [u]frmMain[/u]

frmMain подчеркивает как ошибку, и пишет, что frmMain - не правилний тип
что я делаю не так?
P.S. frmMain явлаетса Mdi

1Steps
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 505
Зарегистрирован: 20.12.2006 (Ср) 0:50
Откуда: New York

Сообщение 1Steps » 08.07.2007 (Вс) 17:29

Код: Выделить всё
Private Sub MDI_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
frmFilter.MdiParent =Me
frmFilter.Show
End Sub
Удалена за ненадобностью.

AndreyG_80
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 169
Зарегистрирован: 10.03.2006 (Пт) 13:27

Сообщение AndreyG_80 » 08.07.2007 (Вс) 21:22

я эту форму из модуля открюваю

есть frmMDI, frmChild и Module1

в frmMDI пишу:
Код: Выделить всё
Public Class frmMDI

    Private Sub frmMDI_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        OpenChild()
    End Sub
End Class

в Module1 пишу:
Код: Выделить всё
Module Module1
    Public frm As frmChild

    Public Sub OpenChild()
        frm = New frmChild
        With frm
            .MdiParent = frmMDI
            .Show()
        End With
    End Sub
End Module


по нормальному это работает, но в том проекте, где я пытаюсь это открыть - не работает и я не могу понять почему....
frmMDI подчеркивает как ошибку, и пишет, что frmMDI - не правилний тип, хотя она наследует windows.forms

В чем может быть проблема?

Nord777
Гуру
Гуру
Аватара пользователя
 
Сообщения: 1144
Зарегистрирован: 22.02.2004 (Вс) 13:15
Откуда: Подольск

Сообщение Nord777 » 08.07.2007 (Вс) 23:33

Код: Выделить всё
    Public Sub OpenChild(ByVal MainForm As Form)
        frm = New frmChild
        With frm
            .MdiParent = MainForm
            .Show()
        End With
    End Sub
Microsoft Visual Studio 2008
Microsoft .NET Framework 3.5


Вернуться в Visual Basic .NET

Кто сейчас на конференции

Сейчас этот форум просматривают: Mail.ru [бот] и гости: 83

    TopList