VB
LaBross
-
Br@scoo -
Br@scoo -
Bonjour,
Comment fais-t'on pour passer un tableau dans une fonction en Visual Basis ???
Comment fais-t'on pour passer un tableau dans une fonction en Visual Basis ???
1 réponse
-
Voici un exemple :
---------------------
Private Sub Command1_Click()
Dim monTableau(1 To 10, 1 To 10)
For i = 1 To 10
For j = 1 To 10
monTableau(i, j) = i * j
Next j
Next i
Call ExempleTableau(monTableau)
'Ici la valeur est changee
MsgBox monTableau(2, 4)
End Sub
Function ExempleTableau(ByRef p_Tableau())
MsgBox p_Tableau(2, 4)
'On change une valeur...
p_Tableau(2, 4) = 999999
End Function
