Additionner un champ numerique ? [VB] - VB/VBA/VBS - Programmation
Marsh Posté le 22-04-2002 à 16:01:58
Tu fais CLng(Text1.Text) et ensuite tu additionne
Marsh Posté le 22-04-2002 à 16:21:15
tu pourrais être plus precis plize...
Marsh Posté le 22-04-2002 à 16:33:32
Ben tu les additionne en vb.
Puis après tu mets la somme dans une variable.
Enfin tu rafraichis le champs texte :
Dim Somme
Somme = champs1+champs2+....+champsn
(ou une boucle...)
Label1.Caption = "Ma somme = " & Somme
Label1.Refresh
C'est ça ?
Marsh Posté le 22-04-2002 à 16:36:56
speed18 a écrit a écrit : Ben tu les additionne en vb. Puis après tu mets la somme dans une variable. Enfin tu rafraichis le champs texte : Dim Somme Somme = champs1+champs2+....+champsn (ou une boucle...) Label1.Caption = "Ma somme = " & Somme Label1.Refresh C'est ça ? |
Non ca marche pas...par contre j'ai trouvé plus simple :
Set rts = db.OpenRecordset("SELECT sum(salTOTAL1) FROM contabilidad" )
rts.MoveLast
LabelTotal.Caption = rts(0)
voila...merci quand même !!!
Marsh Posté le 22-04-2002 à 16:42:03
yes, core mieux...
Par contre, tu peux additioner en vb, heureusement que ça marche...
;-)
Marsh Posté le 22-04-2002 à 17:46:21
Peut etre a t il obtenu une concatenation de chaines parce qu'il n'a pas converti ...
Faire Dim Somme As UnType (Long par ex) permet d'eviter ces surprises ... et de programmer un peu plus proprement
Marsh Posté le 22-04-2002 à 18:26:10
HelloWorld a écrit a écrit : Peut etre a t il obtenu une concatenation de chaines parce qu'il n'a pas converti ... Faire Dim Somme As UnType (Long par ex) permet d'eviter ces surprises ... et de programmer un peu plus proprement |
Ben j'avais bien declare ma variable AS LONG et ca ne marchait pas car sur ma feuille il me mettait 0 pourtant je faisais MOVENEXT mais rien a faire...alors qu'avec le SQL c'est nickel !!!
Marsh Posté le 22-04-2002 à 15:57:57
J'ai un Champ TOTAL dans ma BD qui sur ma feuille est dans un Textbox et je voudrais qu'au chargement de ma feuille il me les additionne tous et me mette le resultat dans un label ....comment on fait ?
merci d'avance
---------------
Mes mémoires de Retrogamer - Le Retroblog de Turk182! en livres - Suivez le blog sur Facebook