Bonjour à tous,
j'ai créé une structure dans mon prg principal (class principale) et dans cette classe je définie un nouvel object : Dim clstools As New cls_tools
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 ' le code appelant avec la definition de la structure
Public Structure zst_MyFiles
        Dim xml_setuptweets As String 'path et filename du setup de l'application
        Dim xml_Switch As String 'fichier xml des correspondances
        Dim xml_bulles As String ' fichier xml
        Dim xml_liner As String 'fichier xml
        Dim xml_Data As String 'nom et chemin du fichier datas
    End Structure
Dim myFiles As zst_MyFiles
 
    Public Sub AllSetupReadXML()
        ' Lecture du xml setup et chargement des data setup dans la structure MyFiles ??? comment faire ?
        clsTools.SetupXML_read(ici la structure myFiles à passer à la classe)
' au retour de clsTools.SetupXML_read, ma structure myFiles sera rempli avec le contenu du xml parsé dans la classe clsTools...
    End Sub
J'ai ensuite créé une autre classe dans laquelle je vais y coller le parseur d'un fichier xml dans lequel il y a les infos qui me permettront de "remplir" la strucutre "myFiles"
Ma nouvelle classe :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Public Class cls_mytools
    Public Sub SetupXML_read(ByRef myFiles As ????)
        ' ici le parse un xml et j'en récupère le contenu dans la Strucure passée à ce sub de la class cls_MyTools... 
    End Sub
Donc en résumé, comment passer une Structure à un sub de class et la récupérée modifié dans la programme appelant ???
Merci de votre aide
Patrick