VB6 @ VB.NET (Index)

CaliceDeTabarnac

Dans VB6 il était possible de créer plusieurs boutton groupé (créer un boutton, le sélectionner, copié, coller et VB6 demande si on veut créer une table de controle) avec un index pour chacun. C'était très pratique pour une application tel qu'une calculatrice:

Private Sub Command1_Click(Index As Integer)
IntNouveauChiffre = Index
End Sub

Est-ce encore possible de créer des tableaux de controles sur VB.NET?

Salut
c'est possible mais de manière différente



exemple:

Private Sub Menus(ByVal sender As System.Object, ByVal e As System.EventArgs) _
Handles mnuFichierEnregistrer.Click, _
mnuFichierEnregistrerSous.Click, _
mnuFichierFermer.Click, _
mnuFichierImprimer.Click, _
mnuFichierMiseEnPage.Click, _
mnuFichierNouveau.Click, _
mnuFichierOuvrir.Click, _
mnuFichierQuitter.Click, _
mnuEditionColler.Click, _
mnuEditionCopier.Click, _
mnuEditionCouper.Click, _
mnuAide.Click, _
mnuAProposDe.Click, _
mcEditionCouper.Click, _
mcEditionCopier.Click, _
mcEditionColler.Click

'Gestionaire de l'événement Click des différents menus

'Menu Fichier
If sender Is mnuFichierNouveau Then
FichierNouveau()
ElseIf sender Is mnuFichierOuvrir Then
FichierOuvrir()
ElseIf sender Is mnuFichierFermer Then
FichierFermer()
ElseIf sender Is mnuFichierEnregistrer Then
FichierEnregistrer()
ElseIf sender Is mnuFichierEnregistrerSous Then
FichierEnregistrerSous()
ElseIf sender Is mnuFichierMiseEnPage Then
FichierMiseEnPage()
ElseIf sender Is mnuFichierImprimer Then
FichierImprimer()
ElseIf sender Is mnuFichierQuitter Then
'Fermer la fenêtre en déclanchant le gestionnaire de l'événement Closing
Me.Close()
end if
End Sub


c'est simplement une piste voir avec le source
http://www.vbfrance.com/code.aspx?ID=17380
qui n'est pas de moi mais qui m'a aider à comprendre.
A++ BFR

CaliceDeTabarnac

C'est cool
Merci