petit probleme de test

samouille666

Voila la question est un, peu ras de terre mais j'ai pas trouve alors bon...
access2000, les fonctions "isempty" , "isnull" ne permette pas de verifier qu'un tableau est vide.
Ubound et Lbound declenche une erreur...
"Not is Nothing" ne fonctionne pas non plus ...
En fait aucune fonction ne permet de verifier qu'un tableau declarer n'a pas été initialiser.

Oui j'ai le mm prob, j'ai ttrouvé une seule parade afin de ne pas faire bugguer le vode, mais c pas propre (On error goto...)

Dim Tableau() As String

On Error GoTo Vide
If Tableau(0) <> vbNullString Then GoTo PasVide Else GoTo Vide

PasVide:
MsgBox "Pas vide"
Exit Sub

Vide:
MsgBox "Tableau vide"

PS: c pas top, mais pour le moment c la seule chose que g trouver!!!!

Si qq a mieux????

n effet, a par utiliser un On Error Goto ca n'est pas très concluant....


attention, dans les options de compilation, on peut déconnecter la verification des tailles des tableaux, donc, je ne sais trop si cela fonctionne alors...

Tu peux au pire stocker un compteur du nombre d'elements de ton tableau...

bonjour,

le isempty ne fonctionne QUE POUR les variables (pas les tableaux) de type VARIANT uniquement.

Pour ma part, je fais ceci :

Dim tableau(10) As String
Dim i As Integer
Dim vide As Boolean

vide = True

Do Until i = 10
If tableau(i) <> "" Then vide = False
i = i + 1
Loop


Je n'ai plus qu'à tester la variable boolean VIDE pour savoir si elle est restée à VRAI ou si une donnée l'a changer en FAUX


Colibri

merci a tous , j'ai conserve la solution du booleen ...
samouille666

Dsl carnez mais ton code ne fonctionne que si un tableau a été déclararé!!!

Je ne pense pas que c la question au depart !! a moin que g pas compris!!!

essaie avec un tableau dynamique:
Dim Tableau() as string

ton code va bugger!!!!

Enfin pour mon exemple c dans le cas d'un tableau dynamique vide, c'est a dire sans aucun enregistrement, comme apres un "erase"!!!!
et c la seule facon que g trouvé!!!

Ps: sinon il y a plus simple et plus rapide que ton code :

Dim tableau(1 To 10) As String
If Trim(Join(tableau, "")) = vbNullString Then MsgBox "tableau vide"

voila ++

Renfield-->essayer de stocker le nb d'element du tableau, mais mm prob si pas diméntionné, alors bug!!!

c'est a peine plus propre lol!!!!

Dim tableau() As String
Dim nb As Integer

On Error Resume Next
nb = UBound(tableau)

If nb > 0 Then MsgBox "tableau Diméntionner" Else MsgBox "tableau non Diméntionner"

Ps: je pense qu'il n'est pas possible de tester si un tableau dynamique posséde au moin un enrg sans bug!!!! ????

Question ouverte???

j'utilise dans mes developpements actuels une classe qui joues le role de pile

j'ai dans un premier temps utilisé une gestion d'erreur pour savoir s'il y avait des elements dans mes piles

j'ai finallement conservé le noombre d'elements dans une variable... il est simple de tester si 'Count' = 0 ....

dites moi ça a l'air d'exite pas mal les conscience de ce forum.
Je remercie pcpunch pour son assiduité à repondre "exactement " a la question, il a raison tout part d'un tab dynamique et le prob est dans la non declaration justement...(puisque des que le tab est declare il est rempli de variable "empty" visiblement un typename() le confirme)

Le probleme avec ton "on error" pcpunch c'est que au moment ou je debugg je ne sais pas du tout ce que le compilo fout si une autre erreur se declare. Je sais que le type d'erreur sur un tableau dynamique non initialise (mais declaré) que l'on essais de mesure (ubound()) est '9' , un err.number me fourni ce renseignement mais dans le cas ou une autre erreur se declare comment je fais pour qu'il reparte sur la ligne ou est née l'erreur? (me suis je bien exprimé? lol)

Renfield me parle de pile, mais je suis un petit nouveau dans la prog desole ça je connais pas ...

j'ai donc pris la solution booleen car il me suffit au moment ou je commence a le remplir (le tab) de changer sa valeur.

samouille666

bon pcpunch a la palme ...
son code :
Dim tableau(1 To 10) As String
If Trim(Join(tableau, "")) = vbNullString Then MsgBox "tableau vide"

marche avec un tableau dynamique non dimensionne.
neanmoins a partir d'une certaine longeur de tableau genre quelque millier de case on peut se demander si au niveau temps de calcul le booleen n'est pas une meilleur solution.
a mediter
merci a tous en tous cas j'ai plus de solutions et de pistes que jamais
samouille666