Erreur incompréhensible Résolu

Question

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&#8217;obtiens une erreur incompréhensible. En effet, j&#8217;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&#8217;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&#8217;où vient cette erreur. Merci de votre aide et patience.

philposer · Accepted Answer

J'ai trouver l'erreur, en fait j'ai oublié un public devant la class article

Erreur incompréhensible

1 réponse

Votre réponse

Discussions similaires