Gambas France BETA


Pas de compte ? Incription

simplifier le code partie 2...

Ce sujet est résolu.

1
AuteurMessages
spheris#1 Posté le 26/11/2021 à 17:28:57
Comment simplifier ce code ci dessous :


1
2
3
4
5
6
7
8
9
10
11
12
13
14
DIM $monjour AS INTEGER[12]

$monjour[0] = Settings["JOUR/m0"]
$monjour[1] = Settings["JOUR/m1"]
$monjour[2] = Settings["JOUR/m2"]
$monjour[3] = Settings["JOUR/m3"]
$monjour[4] = Settings["JOUR/m4"]
$monjour[5] = Settings["JOUR/m5"]
$monjour[6] = Settings["JOUR/m6"]
$monjour[7] = Settings["JOUR/m7"]
$monjour[8] = Settings["JOUR/m8"]
$monjour[9] = Settings["JOUR/m9"]
$monjour[10] = Settings["JOUR/m10"]
$monjour[11] = Settings["JOUR/m11"]


merci pour votre réponse.
linuxos#2 Posté le 27/11/2021 à 14:49:49
Un peu de sel, de poivre et la crevette sera... Salut Spheris,

Essaye en utilisant un 'For i=0 To 11' genre ça:

1
2
3
4
5
6
DIM $monjour AS INTEGER[12]
DIM i AS INTEGER

FOR i=0 TO 11
$monjour[i] = Settings["JOUR/m" & i]
NEXT


Olivier
Lorsqu'on s'occupe d'informatique, il faut faire comme les canards... Paraître calme en surface et pédaler comme un forcené par en dessous.
spheris#3 Posté le 28/11/2021 à 18:57:30
Trop fort, merci, ça tourne super !!!!
1