per eliminare una singola volce da un menu puoi usare il PreRender
nel prerender fai una scansione delle voci con un semplice ciclo While
esempio ( da verificare gli errori di battitura)
ps. il codice originale fu preso dalla rete. io l'ho solo modificato e commentatocodice:' calcolo quante voci ci sono nel menu Dim Totale = menu1.items.count -1 Dim i As Integer = 0 ' il ciclo è attivo fino a quanto non si Raggiunge il valore Totale While i <= Totale 'estraggo il testo dalla singola voce del menu Dim Testo as string testo = Menu1.Items(i).text ' confronto il testo del menu con quello da eliminare If testo = MIACodizione Then 'verifico la presenza di sottomenu e li elimino Dim SubMenu As Integer = Menu1.Items(i).ChildItems.Count - 1 Dim j As Integer = 0 While j <= SubMenu Menu1.Items(i).ChildItems.RemoveAt(0) j += 1 End While 'elimino il menu Menu1.Items.Remove(ss) i = i - 1 ' reimposto il totale delle voci di menu dopo l'eliminazione Totale = Totale - 1 End If Next
ciao

Rispondi quotando