Tableau vide à dimension variable

[Sapin]

Bonjour à tous,

je vais essayer d'etre bref et synthetique.

J'ai declarer public un tableau de type defini par moi meme.

Ex:

'Définition du type:
type groupe
dim numero as groupe
dim chaine as string
etc...
end type


et je fait alors un tableau de dimension non fixe ayant une portee public

Public tableau() as groupe

Lorsque l'utilisateur click sur un bouton j'appelle alors la fonction suivante servant à incrementer d'1 la taille du tableau et d'affecter un nouveau groupe. J'utilise pour celà la fonction Ubound.

Redim tableau ( 1 to Ubound(tableau)+1)
tableau(Ubound(tableau))=groupeàaffecter

Mais je rencontre un probleme au premier appel de cette fonction, en effet
Ubound(tableau) ne marche pas car tableau=Nothing d'apres le deboggeur

Pourtant, quand j'essaie de tester si tableau est vide ou pas, les fonction s suivantes ne marche pas:

IsNothing(tableau)=true
tableau Is Nothing
tableau = Nothing

de même avec Empty, et Null

Merci pour avoir lu tout ce barratin, en vous remerciant tous par avance,
Seb

 

[Zon]

Salut,

EN passant par une gestion d'erreur:

On Error Resume Next
Redim tableau ( 1 to Ubound(tableau)+1)
if err<>0 then Redim tableau(1 to 1)
'suite

SI cela ne fonctionne pas mets un fichier exemple.

A+++

 

[Sapin]

Merci de tes conseils Zon, ça marche!
Sapin