bonjour, j'ai une question un peu farfelue, après quelques mois d'abandon je me suis remis a vb.net et j'aimerais bien un truc propre plutôt que d'avoir un pavé genre :
p2 = Val(tbprix2.Text)
p3 = Val(tbprix3.Text)
p4 = Val(tbprix4.Text)
p5 = Val(tbprix5.Text)
p6 = Val(tbprix6.Text)
p7 = Val(tbprix7.Text)
p8 = Val(tbprix8.Text)
p9 = Val(tbprix9.Text)
p10 = Val(tbprix10.Text)
p11 = Val(tbprix11.Text)
p12 = Val(tbprix12.Text)
p13 = Val(tbprix13.Text)
p14 = Val(tbprix14.Text)
p15 = Val(tbprix15.Text)
p16 = Val(tbprix16.Text)
p17 = Val(tbprix17.Text)
p18 = Val(tbprix18.Text)
est-il possible de le réduire avec une boucle ? bon j'ai essayer de mon côté mais, pas sûr que ça fonctionne !
donc le but c'est réduire le code
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 Dim p1 As String Dim i = 1 While i < 18 p1 = ("p" + i + "=val(tbprix" + i + ".text") i += 1 End While
en vous remerciant !
Partager