Problème avec les classes en vb.net

Question

Salut &#224; tous

J'ai le code suivant pour le moment



'**Ma Classe**

Public Class Voiture

    Function d&#233;marre(ByVal contact)

        If contact = True Then

            Return "d&#233;marr&#233;"

        End If

    End Function

End Class



'***Le code qui appelle la classe***

Private Sub Button1_Click(ByVal sender etc...)

    Dim mavoiture As New Voiture()

    Dim etat As String



    etat = mavoiture.d&#233;marre(True)

    MsgBox(etat)

End Sub



Je cherche comment transformer le code d'appel pour cr&#233;er x voitures

En gros je voudrais un truc du genre :



Private Sub Button1_Click(ByVal sender etc...)

    dim x as integer

    x = 6

    Dim mavoiture(x) As New Voiture()


    Dim etat As String




    etat = mavoiture(x).d&#233;marre(True)


    MsgBox(etat)


End Sub




Voila est-ce que quelqu'un peut m'aider je me casse la t&#234;te sur ce code



Merci d'avance 


Eka808

eka808 · Answer

vraiment pas d'id&#233;es ?

eka808 · Answer

Private Sub Button1_Click(......) Handles Button1.Click

    Dim i As Integer

    Dim etat As String

    Dim mavoiture(5) As Object



    'Chargement des voitures

    For i = 1 To 5

        mavoiture(i) = New Voiture()

    Next i



    'Appel de la fonction d&#233;marre

    For i = 1 To 5

        etat = mavoiture(1).d&#233;marre(True)

        MsgBox(Str(i) + " " + etat)

    Next i



End Sub

Problème avec les classes en vb.net <Hellppppp!!!!>

2 réponses

Discussions similaires