Discussion :

[bubu92]

bonjour a tous,

j'utilise VB6.
J'ai créer plusieurs type utilisateur (UDT) et une variable global "test".
J'aurais aimé pendant l'execution du programme, pouvoir réaffecté la
variable "test" a differents type, mais sans succès
En fait je voulais sauvegarder dans un fichier ouvert en "binary" les type
utilisateurs, sans avoir a passer par une variable pour chaques types.
Ou peut etre est-il possible de créer une variable dans VB d'une longueur
suffisante par rapport au type, de recuperer son adresse, d'aller ecrire
dedans, puis de l'ecrire dans le fichier avec une instruction api, mais
ça me semble compliqué, peut etre ya t-il plus simple

[Delbeke]

Les instruction de dimmensionnement sont des directives de compilation. A ma connaissance, il n'existe pas de possibilité de changer le type d'une variable en cours d'exécution en vb. Par contre regarde dans l'aide en ligne de vb, le type de variable "Variant". Peut être que cela t'aidera.

[ucfoutu]

Bonjour (et un salut à Delbeke),

à bubu92, qu'entends-tu EXACTEMENT par "type utilisateur" ?

Parles-tu d'une variable/données définie par l'utilisateur (une structure) ?

[bubu92]

oui un truc genre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
Type toto
   a as Integer
   b as Long
End Type

en fait ce que je voudrais c'est eviter de créer des variables global comme ceci :

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
16
17
18
19
20
21
22
23
24
25
26
 
Type toto1
   a as Integer
   b as Long
End Type
 
Type toto2
   a as Single
   b as Integer
End Type
 
Global Test1 as toto1
Global Test2 as toto2
 
----form----
 
Test1.a = 12
Test1.a = 6
 
Test2.a = 10.5
Test2.a = 3
 
Open "C:\gaga.txt" For Binary Access Read Write Lock Read Write As #1
   Put #1,,Test1
   Put #1,,Test2
Close #1

Le probleme c'est que des "Type totoX" j'en ai 1000
Si j'avais pu réaffecter la variable "Test" dans une boucle ça aurait été plus
simple

[OhMonBato]

1000 structures différentes dans un seul programme ?
Y'a pas moyen d'en regrouper certaines ?

[ucfoutu]

Ce que j'adore, moi, c'est ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
----form----
 
Test1.a = 12
Test1.a = 6
 
Test2.a = 10.5
Test2.a = 3
 
Open "C:\gaga.txt" For Binary Access Read Write Lock Read Write As #1
   Put #1,,Test1
   Put #1,,Test2
Close #1

Ah, le soin apporté à ce que l'on étale ... !!!