Appliquer une "structure" à une string

cs_Claude56 Messages postés 3 Date d'inscription jeudi 2 janvier 2003 Statut Membre Dernière intervention 23 avril 2003 - 23 avril 2003 à 16:57
cs_Claude56 Messages postés 3 Date d'inscription jeudi 2 janvier 2003 Statut Membre Dernière intervention 23 avril 2003 - 23 avril 2003 à 17:32
Le but est d'appliquer à une string dont on ne connait pas à priori le contenu une structure de champs fixes.
Utilisation d'un type spécifique et application de la string à une variable de ce type utilisateur.

Ex :
Type essai
field1 As String 2
field2 As String 5
field3 As String 3
...
End Type

Dim var As essai
Dim buf

...
' buf initialisé par ailleurs
...

var = buf

Cela donne l'erreur de compilation suivante :
"seuls les types définis par l'utilisateur ou qui sont définis dans des modules d'objets publics peuvent être convertis depuis ou vers un variant"

Malgré la déclaration en public, dans un module,... l'erreur persiste !

Comment résoudre ce problème ?
Merci d'avance

2 réponses

BasicInstinct Messages postés 1470 Date d'inscription mardi 5 février 2002 Statut Membre Dernière intervention 20 octobre 2014 12
23 avril 2003 à 17:05
Faut plutot que tu fasses 1 truc du style

var.field1=mid(buf,1,2)
var.field2=mid(buf,3,5)
var.field3=mid(buf,8,3)

:clown) BasicInstinct :clown)
0
cs_Claude56 Messages postés 3 Date d'inscription jeudi 2 janvier 2003 Statut Membre Dernière intervention 23 avril 2003
23 avril 2003 à 17:32
En fait je voulais éviter cette écriture dans la mesure où la string à exploiter contient plusieurs fois la "structure" et je voulais utiliser une variable Tableau de type utilisateur.

Dim var(n) As essai

Pour l'exploitation, il suffisait ensuite de travailler avec une boucle sur la variable tableau.
0
Rejoignez-nous