Migration menus indexés VB6 en VB.Net
Bonjour,
Je cherche un équivalent VB.Net simple du code suivant VB6 qui implique des menus indexés (sous forme de tableaux) ?
La propriété Index d'un menu ayant disparu sous VB.Net 2013, il ne semble plus possible de disposer de menus sous forme de tableaux.
Voici le code VB6 :
Code:
1
2
3
4
5
6
7
8
9
10
11
| 'Le menu "mnuItems" est créer avec le créateur de menus sous VB6,
'en disposant de la propriété Index = 0.
mnuItems(0).Caption = "Item 0"
Dim i As Integer, NbItems A Integer
NbItems = 5
For i = 1 to NbItems - 1
'Chargement de nouveaux items du menu.
Load mnuItems(i)
mnuItems(i).Caption = "Item" & Str$(i)
mnuItems(i).Checked = True
Next i |
Merci d'avance. :)
René
