Discussion :

[flandreau]

Bonjour,

J'ai une liste de vente dans laquelle il y a la liste des gains.

Peut-on faire la somme d'un zone de liste gain dans un texte box ?

Merci d'avance

[Vince]

Oui mais il faut faire attention aux types.

exemple :
textBox.Text = 1 --> erreur à la compilation
textBox.Text = "1" --> OK
textBox.value = 1 --> pas sûr que ça passe la propriété value est peut-être en lecture seule

ou convertir ton numérique en texte, Access est un peu loin pour moi je ne me souviens plus de la fonction mais en gros c'est :
textBox.Text = str(1)

Quand à ta liste il faudrait plus détails sur sa structure est-elle dans un fichier texte ?

[Invité]

Bonjour

Voilà un exemple de code qui devrait convenir

un bouton de commande pour lancer le calcul
une zone de liste : lstCompte
une zone de texte : txtResultat

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub Commande21_Click()
    Dim i As Integer
    Me.txtResultat.Value = 0
    For i = 0 To Me.lstCompte.ListCount - 1
        Me.txtResultat.Value = CDbl(Me.lstCompte.Column(0, i)) + Me.txtResultat.Value
    Next i
End Sub

Explications

• On crée une variable : i
• On met à 0 la zone de texte
• On réalise une boucle pour parcourir toutes les lignes de la zone de liste
• On ajoute dans la zone de texte, le résultat de la liste grâce à la propriété Column, (le 0 correspond à la première colonne de la zone de liste).

Un peu de recherche dans l'aide pour la syntaxe et un peu d'adaptation devrait convenir.

Starec