Erreur incompréhensible [Résolu]

philposer 18 Messages postés samedi 12 février 2005Date d'inscription 10 octobre 2012 Dernière intervention - 10 juil. 2011 à 21:52 - Dernière réponse : philposer 18 Messages postés samedi 12 février 2005Date d'inscription 10 octobre 2012 Dernière intervention
- 10 juil. 2011 à 22:16
Bonjour à tous ou plutôt bonsoir au vu de l'heure,

Tout d'abords, j'espère ne pas m'être trompé de catégorie pour mon problème. Lors de la création d'une classe, j’obtiens une erreur incompréhensible. En effet, j’obtiens un erreur : "'ListArticles' ne peut pas exposer le type 'Articles.Article' en dehors du projet via class 'ListArticles'."
'mise en rouge aussi dans le code de la classe ci-dessous. Je ne parvient pas à définir d’où elle peut venir.

Voici le code des class

Class ListArticle
Option Strict On
Option Explicit On

Imports AGPCDC.CDC.Articles

Namespace CDC.Lot

    Public Class ListArticles

        Private A_ListArticle As New List(Of Articles.Article)

        Public Property ListArticles() As List(Of Article
)
            Get
                Return A_ListArticle
            End Get
            Set(ByVal value As List(Of Article))
                A_ListArticle = value
            End Set
        End Property

        Public Sub New()
        End Sub

    End Class

End Namespace


class Article
Option Strict On
Option Explicit On

Namespace CDC.Articles

    Class Article
        Inherits ListSousArticle

        Public Sub New()
        End Sub

        Private A_TitreArticle As String
        Private A_ParagrapheConcerne As String
        Private A_ParagrapheDescription As String


        Public Property TitreArticle() As String
            Get
                Return A_TitreArticle
            End Get
            Set(ByVal value As String)
                A_TitreArticle = value
            End Set
        End Property

        Public Property ParagrapheConcerne() As String
            Get
                Return A_ParagrapheConcerne
            End Get
            Set(ByVal value As String)
                A_ParagrapheConcerne = value
            End Set
        End Property

        Public Property ParagrapheDescription() As String
            Get
                Return A_ParagrapheDescription
            End Get
            Set(ByVal value As String)
                A_ParagrapheDescription = value
            End Set
        End Property

    End Class

End Namespace


Si vous souhaitez d'autre informations, n'hésiter pas à demander... En tout cas, j'espère que l'un de vous pourra me faire comprendre d’où vient cette erreur. Merci de votre aide et patience.
Afficher la suite 

Votre réponse

1 réponse

Meilleure réponse
philposer 18 Messages postés samedi 12 février 2005Date d'inscription 10 octobre 2012 Dernière intervention - 10 juil. 2011 à 22:16
3
Merci
J'ai trouver l'erreur, en fait j'ai oublié un public devant la class article

Merci philposer 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 93 internautes ce mois-ci

Commenter la réponse de philposer

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.