Réinitialiser des variables

log2002 Messages postés 29 Date d'inscription mardi 1 avril 2003 Statut Membre Dernière intervention 30 décembre 2004 - 14 août 2003 à 09:53
RicoNuch Messages postés 140 Date d'inscription mercredi 18 juin 2003 Statut Membre Dernière intervention 16 décembre 2006 - 14 août 2003 à 14:30
Bonjour,

j'aimerai réinitialiser toutes mes variables. Y a t il une méthode connue et simple d'utilisation...

Si y a qq1 qui c merci de me laisser un ptit bout de code!

@+
A voir également:

3 réponses

RicoNuch Messages postés 140 Date d'inscription mercredi 18 juin 2003 Statut Membre Dernière intervention 16 décembre 2006
14 août 2003 à 10:54
Hello !
Ta question laisse supposer que tu as un grand nombre de variables à réinitialiser. Le plus facile est de déclarer des tableaux de variables et de les réinitialiser dans une boucle.

Dim strDemo(0 to 10) As String, intDemo(0 to 10) As Integer
Dim I as Integer

For I = 0 To 10
strDemo(I) = vbNullstring
intDemo(I) = 0
Next I

RicoNuch
0
log2002 Messages postés 29 Date d'inscription mardi 1 avril 2003 Statut Membre Dernière intervention 30 décembre 2004
14 août 2003 à 12:15
Merci, mais en fait g trouvé + simple :

je déclare mon tableau en variant en haut et dans une autre procédure que j'appelle init ex :

Dim v_tab_paiement_vide(1 To 4, 1 To 5) As Variant

v_tab_paiement = v_tab_paiement_vide

juste pour info !
0
RicoNuch Messages postés 140 Date d'inscription mercredi 18 juin 2003 Statut Membre Dernière intervention 16 décembre 2006
14 août 2003 à 14:30
Inconvénient de ta technique : toutes tes variables sont de type Variant, ce qui consomme de la ressource et ralenti ton code. Mais si cela ne te pose pas de problème il y a encore plus simple :

Déclarer le tableau de variant sans dimension...
Dim v_tab_paiement () As Variant

...Et le redimensionner avec Redim sans Preserve, ce qui a pour effet de le vider
Redim v_tab_paiement (1 To 4, 1 To 5)

RicoNuch
0
Rejoignez-nous