Har satt isMdiContainer = true för formen M. I formen ligger en MainMenu och dess MenuItem egenskap Enabled = false. När Sub M_Load körs öppnas formen L där anger användaren användarnamn samt lösen. Om användaren är ok vill jag att ett menuItem i formen M skall tillgängliggöras, M.MainMenu1.MenuItems.Item(i).Enabled = True. Jag lyckas dock ej påverka menyn i M. Kan någon ge lite råd om hur jag skall göra för att få det att fungera.

Kod i formen M
Private Sub M_Load(…….
Dim L As New Losen()
L.MdiParent = Me
L.Show()
End Sub

Kod i formen L
Private Sub lstAnvNamn_MouseDown(…..
Dim m As New Matematik()
if …. then
m.MainMenu1.MenuItems.Item(0).Enabled = True
end sub


Många tack på förhand
Fredrik

>Kod i formen L
>Private Sub lstAnvNamn_MouseDown(…..
> Dim m As New Matematik()
>if …. then
> m.MainMenu1.MenuItems.Item(0).Enabled = True
>end sub


Du borde väl inte skapa ett nytt Matematik formulär utan ändra det du redan har. Om L är MDI barn till M så borde du kunna göra

Dim m As Matematik = CType(MdiParent, Matematik)


MS

Tack!

En följdfråga när jag satt och klurade på hur jag skulle lösa problemet testade jag med Dim m As Matematik, detta räckte inte, vad är det som händer i deklarationssatsen sista del "(MdiParent, Matematik)"?

FredrikO