comment tester si un tableau dynamique est vide ????

Question

un p'tite question...

savez vous comment tester si un tableau dynamique poss&#232;de au moins une valeur 

1&#176; ) j'ai cre&#233;r 3 tableau dynamiques.

Dim tabErreur as string()
Dim tabAvertissement as String()
Dim tabReference as String()

2&#176;) je lit les lignes d'un fichier .log et en fonction de son contenu je place la ligne dans 1 des 3 tableaux dynamique. 
   if ... then
      i=i+1      
      Redim Preserve tabErreur(i)
      tabErreur(i-1) = ligne    
   End if
  
3&#176;) A la fin j'appel une procedure en lui passant en parametre le tableau dynamique mais je ne dois l'appeler que si mon tableau dynamique poss&#232;de au moins une valeur... :-s

Savez vous comment tester si un tableau dynamique poss&#232;de au moins une valeur ( Empty ?)
(je pensais utiliser Ubound(tab) mais erreur d'indice en dehors de la plage )

merci pour votre attention,

mika

Gobillot · Accepted Answer

tu as la r&#233;ponse:

 MsgBox CBool(Not (Not tabErreur))

Daniel

Starec · Answer

Salut,
 Je pense d'abord que tu as un probl&#232;me de syntaxe sur le Ubound, tu met tab, est-ce une erreur de saisie ?. si non, tu dois mettre le nom de ton tableau Ubound(tabErreur,1), quand au 1 c'est le test sur la premi&#233;re dimension de tableau.

Fait le test si le champ est vide "", par une boucle.

En esp&#233;rant t'avoir aid&#233;

Gobillot · Answer

si tableau pas dimentionn&#233;, Ubound() se plante, IsEmpty() se plante, ...

    If Not (Not tabErreur) Then
       MsgBox UBound(tabErreur)
       End If

Daniel

youkizouki · Answer

bonjour starec, * pour tab c'est une erreur de syntaxe (trop vite..) *sinon, tu ne peux pas faire un Ubound(nomTableau) sur un tableau dynamique qui n'a pas etait initialisé... Dim tabErreur() as String: est un tableau qui n'a pas encore de taille donc d'indice et Ubound renvoie le plus grand indice... Déf: Ubound(tab,dimension) : renvoie une valeur de type

[javascript:alink_4.Click() Long] contenant le plus grand indice disponible pour la dimension indiquée d'un

[javascript:alink_5.Click() tableau]. je pourrais trvailler inversément, c'est a dire 1°)declarer le tableau 2°) redimensionner 3°) if ....then tabErreur(i)=ligne i=i+1 Redim Preserve tabErreur(i) end if >> mais le mon tableau serait trop grand de 1 du fait qu'il est initialiser à la fin. (inutile) n'y a t il pas un moyen plus propre de tester cela

youkizouki · Answer

1 seule ligne... C'est parfait !!! 

merci a vous deux...

cordialement,

mika

Comment tester si un tableau dynamique est vide ????

5 réponses

Discussions similaires