[VB.NET] GotFocus su MDIForm

[FinalFantasy]

Private Sub frmpreventivo_GotFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.GotFocus
        Dim genitore As New frmprincipale
        genitore.mniprepareprint.Enabled = True

        Console.Write("test")
    End Sub

questo codice mi deve abilitare una voce di un menu e deve scrivere test nella console , ma nn va nell'uno e nell'altro...cm mai?

questo è un form messo dentro un mdicontainer

[mardok30]

Invece di GotFocus prova con Activated

[FinalFantasy]

Originariamente inviato da mardok30
Invece di GotFocus prova con Activated

funziona, però nn mi attiva la voce del menu...

[FinalFantasy]

up

[mardok30]

Perché se scrivi:

Dim genitore As New frmprincipale
genitore.mniprepareprint.Enabled = True

crei un'altra istanza del frmprincipale (che non ti viene visualizzata perché non usi il metodo Show), quindi ti va ad abilitare la voce del menu della nuova istanza.
Per disabilitare la voce del menu puoi usare una variabile globale booleana. Se il form è aperto la setti a True(). Se il form è chiuso la setti a False.
Poi, nel metodo select del menu del Form principale scrivi:

If Boolfrmpreventivo = False Then
            MenuItem.Enabled = False
        Else
            MenuItem.Enabled = True
        End If

E poi Console.Write("test") lo metti nella Activated
Se sono stato infelice nella spiegazione...chiedi pure.

[FinalFantasy]

crei un'altra istanza del frmprincipale (che non ti viene visualizzata perché non usi il metodo Show), quindi ti va ad abilitare la voce del menu della nuova istanza.
Per disabilitare la voce del menu puoi usare una variabile globale booleana. Se il form è aperto la setti a True(). Se il form è chiuso la setti a False.
Poi, nel metodo select del menu del Form principale scrivi:
[/QUOTE]

confesso di nn aver capito un fico secco...cos'è un'istanza?

[mardok30]

Un form, così come una textbox, combo..., è una classe e ogni volta che inserisci un oggetto del genere nella tua applicazione crei una sua "istanza". Metti 10 textbox? hai creato 10 istanze della classe Textbox.
Cerca di seguire il metodo che ti ho descritto per risolvere il problema, lasciando stare il codice:

Dim genitore As New frmprincipale
genitore.mniprepareprint.Enabled = True