Comment utiliser TYPE du vb6 en vb8 ?

Question

Erreur Protetcted sub qui est censé me remplacer mon TYPE...
Dans un module, voici ce que j'aimerai faire fonctionner comme structure:


    Friend Structure vbDialogueExplorer
        Dim Type As String
        Dim Titre As String
        Dim Message As String
        Protected Sub Configuration()
            Dim NomFichier As String
            Dim DossierRacine As String
        End Sub
    End Structure

Duke49 · Answer

Sa rox ^^


    Friend Structure vbDialogueExplorer
        Dim Type As String
        Dim Titre As String
        Dim Message As String
        Class Configuration
            Dim NomFichier As String
            Dim DossierRacine As String
        End Class
    End Structure



Dim myExplorer As New vbDialogueExplorer

Duke49 · Answer

NON :( impossible d'accéder a l'initialisation des variables de Configuration :(

Duke49 · Answer

Friend Structure vbDialogueExplorer
        Dim Type As String
        Dim Titre As String
        Dim Message As String
        Private NomFichier As String
        Private DossierRacine As String
        Property Configuration(ByVal myVar)
            Get
                Return myVar
            End Get
            Set(ByVal value)
                myVar = value
            End Set
        End Property
    End Structure


Peut être il existe un myVar as VarPointer ?
Sa marche pas: myExplorer.Configuration("NomFichier") = "Test"

Utilisateur anonyme · Answer

Salut,
Il existe un cours sur les structures vers le bas de cette page
A bientôt.

Comment utiliser TYPE du vb6 en vb8 ?

4 réponses

Votre réponse

Discussions similaires