Dim index As Integer index = mnuPrinc.Count Load mnuPrinc(index) mnuPrinc(index).Caption = "NuovoMenu" mnuPrinc(index).Visible = True Dim index As Integer index = mnuPrinc.Count Load mnuPrinc(index) mnuPrinc(index).Caption = "NuovoMenu" mnuPrinc(index).Visible = True |