tableau a 2 dimensionsRésolu

Question

bonjour,

J'aimerai savoir comment passer un tableau a 2 dimensions (ou plus) a une procedure en vb 2005 ou 2008

merci

nicolas

meldur74 · Accepted Answer

Private






Sub
 maFct(

ByVal
 p_arrTableau(,
) 
As



String
)
mets une virgule entre les ( )

Meldur

meldur74 · Answer

Private



Sub
 Button1_Click(

ByVal
 sender 

As
 System.Object, 

ByVal
 e 

As
 System.EventArgs) 

Handles
 Button1.Click


Dim
 arrTableau() 

As



String
 = {

"a"
, 

"b"
}maFct(arrTableau)


End



Sub






Private



Sub
 maFct(

ByVal
 p_arrTableau() 

As



String
)Console.WriteLine(p_arrTableau(0))

Console.WriteLine(p_arrTableau(1))


End



SubEt voila...

Meldur

cs_thierry la fronde · Answer

bonjour,

Pourquoi ne pas utiliser plutôt une Classe  Array ou ArrayList (ou d'autres.
Dim arrTableau() 
As  New Array ={ {
"a", 
"b"}
,{"z","y","r"}}

par contre pour la définition de la fonction Private
Sub maFct(
ByVal p_arrTableau() 
As
String)

si c'est un Sub évite d'appeler la procedure MaFct. Une fonction renvoie une valeur, pas une procédure.

thierry la fronde

garnier54 · Answer

meci pour ta reponse Meldur
 mais l'exenple que tu donne c'est n'est pas un tableau a 2 dimensions ! c'est un tableau a 1 dimension qui contient 2 elements.






nicolas

PCPT · Answer

salut,

l'exemple de remplissage du tableau donné par 

[../auteur/MELDUR74/176900.aspx meldur74]

 est bien à une seule dimension, mais :


Private



Sub
 maFct(

ByVal

 p_arrTableau()


As



String
)





le passage d'argument, ici donc le tableau, ne mentionne pas le nombre de dimensions.
c'est le même code, peut importe le tableau, tant que le type est bon

ps : on passera un tableau de préférence BYREF (et non BYVAL)
++

 
Prenez un instant pour répondre à [sujet-SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp

meldur74 · Answer

Effectivement, c'est un tableau a une dimension, mais c'etait pour l'exemple.
A partir de la, tu peux passer le nombre de dimension que tu veux.

Pour le nom de la fonction, autant pour moi, j'ai fait ca un peu a l'arrache et je n'ai pas fait attention.

Meldur

cs_thierry la fronde · Answer

Dim
 arrTableau(2,1) 

As



String => tableau de trois lignes et deux colonnes (sauf erreur de ma part)

thierry la fronde

garnier54 · Answer

voila c'est ca que je voudrais faire mais la ca plante


merci

Public








Class

 Form1



Private





Sub

 Button1_Click(


ByVal

 sender 


As

 System.Object, 


ByVal

 e 


As

 System.EventArgs) 


Handles

 Button1.Click



Dim

 arrTableau(9, 9) 


As





String


arrTableau(0, 0) = 





"a"


arrTableau(0, 1) = 





"b"


maFct(arrTableau)








End





Sub 

 










Private





Sub

 maFct(


ByVal

 p_arrTableau() 


As





String

)ListView1.Items.Add(p_arrTableau(0, 0))

ListView1.Items.Add(p_arrTableau(0, 1))



End





SubEnd







Class




nicolas

garnier54 · Answer

merci bcp c'est bon

nicolas

Tableau a 2 dimensions

9 réponses

Votre réponse

Discussions similaires