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
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"
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
Ma nouvelle classe :
Donc en résumé, comment passer une Structure à un sub de class et la récupérée modifié dans la programme appelant ???
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
Merci de votre aide
Patrick
Partager