rss
Rechercher : dans
Par : Pertinence Date Nom d'utilisateur
Statut : Non résolu

VB : tableau en Constantes

Posté par eddys, le mardi 11 juin 2002 à 08:18:15
Salut !!

Je vous savoir ... y a un moyen de declarer une constante en VB qui soit un tableau ?
Qd j'essaie de coder ca, il me dit que j peux pas mais j m'y prends ptet mal ...

En fait ce que j voulais faire, c'est coder en dur une liste de champs que j dois importer d'une base de données, pour pouvoir ensuite generer automatiquement la requete grace a cette liste ...
(j veux pas coder les champs en dur dans la requete pour pouvoir ajouter ou retirer facilement un champ dans le futur)

Voili voilou ... merci de toute aide ou toute idee aportee :o)

@+ !
Répondre à eddys  Signaler ce message aux modérateurs Aller au dernier message

1


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
MarsuGL, le mardi 11 juin 2002 à 17:50:13
A chaque fois que j'ai codé en dur, je l'ai toujours regrété par la suite,
un jour ou l'autre ton appli évolue et ton code en dur te genre.

sinon au moins met le dans un fichier texte que tu charge.
Répondre à MarsuGL

2


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
eddys, le mercredi 12 juin 2002 à 09:50:56
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)
Répondre à eddys

3


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
gilles, le samedi 27 octobre 2007 à 12:42:50
Bonjour, je veux declarer un tableau de 20 elements mais vb6.refuse toujour j'ai mis

dim montableau() as integer={1, 2, 3, 4, 5,6,7, 8, 9, 10, 11,13, 17, 18, 12, 14, 15, 16, 19, 20}
j'ai essayé mais il y a d'erreur aider moi svp!!!
Répondre à gilles

5


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
 eximius55, le mardi 30 octobre 2007 à 11:07:43
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
Répondre à eximius55

4


  • 1
    Ce message vous semble utile, votez !
  • Ce message ne vous semble pas utile, votez !
  • Signaler ce message aux modérateurs
eximius55, le mardi 30 octobre 2007 à 10:57:38
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(20) As Integer
i = 1
For x = LBound(monTableau) To UBound(monTableau) - 1
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
Répondre à eximius55
Logiciels pertinents trouvés dans les téléchargements
Télécharger Visual Basic 6 Runtime (VB6 DLL) 6.0 SP5Visual Basic 6 Runtime (VB6 DLL) - Le Runtime Visual Basic 6 contient l'ensemble des librairies (DLL) nécessaires pour exécuter des programmes écrits en...Catégorie: Librairies (DLL)
Licence: Freeware/gratuit
Télécharger VbrFix 1H BetaVbrFix - VBR Fix est un logiciel permettant de réparer les fichiers MP3 endommagés encodés en bitrate variable (VBR - Variable...Catégorie: Extraction
Licence: Freeware/gratuit
Télécharger VB Editor 2.0VB Editor - Décompileur de fichiers exécutables compilés avec Visual Basic 5 ou 6 Catégorie: Visual Basic
Licence: Freeware/gratuit
Télécharger MediaInfo 0.7.7.4MediaInfo - MediaInfo fournit la liste des codecs nécessaires ainsi que des informations techniques sur vos fichiers vidéo et audio. ...Catégorie: Codecs
Licence: Open Source
Plus de logiciels gratuits sur « VB : tableau en Constantes »