VB : tableau en Constantes

Ouep j vois ce que tu veux dire

En fait ce que j voulais faire justement c'est stocker ces fameux champs pour que la requete soit generee automatiquement

Et du coup au niveau maintenance, t as plus qu'a changer ce tableau de constantes au lieu de changer toutes les portions de code (et differentes fonctions qui les utilisent) correpondants dans le source.

J'ai po trouve mieux ... mais si des idees vous viennent j suis preneur :o)

Salut Gilles,

Effectivement VB n'aime pas trop ce type d'affectation, pour ma part je verrais les choses comme ca :

' Pour des contantes de type INTEGER
Dim i As Integer
Dim x As Integer

Dim monTableau(19) As Integer
i = 1
For x = LBound(monTableau) To UBound(monTableau)
monTableau(x) = i
MsgBox monTableau(x)
i = i + 1
Next

'Et pour les constantes de type STRING
Dim myArray1() As String
Dim myString As String
myString = "A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,V,W,X"

myArray1 = Split(myString, ",")

For x = LBound(myArray1) To UBound(myArray1)
MsgBox myArray1(x)
Next