Public Structure Joueurs
        Dim Numero As Int16
        Dim Nom As String
        Dim Position As String
        Dim Salaire As Decimal
    End Structure
    Public Structure Equipes
        Dim Nom As String
        Dim ville As String
        Dim Budget As Decimal
        Dim Joueur(20) As Joueurs
    End Structure