Discussion :

[jeange]

bonjour,
je suis entrain de travailler sur un petit projet de facture de resto et j'ai créer un listbox et j'aimerais chaque fois que l'usager clique sur un item pour le selectionner et ensuite clique sur le bouton supprimer que l'item soit supprimer de la liste mais que aussi le prix associé à cet item soit soustrait du montant total. Je suis capable d'enlever un item du listbox avec ce code

Code :

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

lstFacture.Items.Remove(lstFacture.SelectedItem)

mais comment faire soustraire le prix de l'item du montant total j'en ai aucune idée.

je suis débutant en vb.net je connaît pas toutes les fonctions disponible pour accomplir certaines tâches.

merci.

[benito9253]

Je ne comprend pas bien ton problème...
Tu récupère la valeur de l'item séléctionné et tu fais une soustraction:

Code :

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

1
2
        Dim PrixASoustraire As Integer = lstFacture.Items.Item(lstFacture.SelectedIndex)
        NouveauMontant = MontantTotal - PrixASoustraire

[jeange]

bien jai des bouttons qui ajoutes des objets dans le listbox et j'aimerais assosier un prix avec chaque objet donc quand on le supprime du listbox le montant de cet objet là ce soustrait du total.

j'ai attaché une image de mon programme à ce message pour que vous puissiez comprendre on peut le concept de ce que j'essaie d'accomplir

[StormimOn]

Tu remplies comment la liste ? Ce sont juste des chaînes de caractères ?

[jeange]

oui c'est ca c'est juste du texte qui ce fait ajouter

[StormimOn]

A ce moment défini une classe qui représente ton produit. En gros un prix, un libellé et éventuellement un libellé spécifique pour l'affichage si on reprend ton exemple avec une ListBox. Pas utile avec un DataGridView.

Par exemple

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
Public Class Produit
   Private _libelle As String
   Private _prix As Decimal
 
   Public ReadOnly Property Libelle() As String
       Get
           Return _libelle
       End Get
   End Property
 
   Public ReadOnly Property Prix() As Decimal
       Get
           Return _prix
       End Get
   End Property
 
   Public ReadOnly Property Affichage() As String
       Get
           Return _libelle + " ----> " + _prix
       End Get
   End Property
 
   Public Sub New(ByVal libelle As String, ByVal prix As Decimal)
       _libelle = libelle
       _prix = prix
   End Sub
End Class

Ensuite tu crées une liste de produits qui sera liée avec la ListBox (DataBinding)

Code :

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

1
2
3
4
5
6
7
Dim produits As List(Of Produit) = New List(Of Produit)()
 
produits.Add(New Produit("produit 1", 12.56D))
produits.Add(New Produit("produit 2", 3.14D))
 
listBox1.DataSource = produits
listBox1.DisplayMember = "Affichage"

Ainsi tu n'auras plus des chaînes de caractères dans ta liste mais des objets, Produit dans l'exemple, possédant un prix. Pour accéder à l'item sélectionné

Code :

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

Dim produit As Produit = DirectCast(listBox1.SelectedItem, Produit)

[jeange]

ah ok c'est un peu plus compliqué que je pensait pour mon calibre je vais essayer de faire fonctionner le programme avec le code que vous m'avez donner, je n'est pas vraiment apris les classes j'utilise juste celle du formulaire d'habitude, le get et le return non plus je n'ai pas appris, mais je vais essayer de faire le tout fonctionner.

merci

[jeange]

je voulait savoir quoi sert les _ en avant des variables comme dans _libelle?

[StormimOn]

C'est juste une convention d'écriture de certains développeurs. Un champ préfixé par _ signifie généralement qu'il est privé.

[jeange]

ah ok j'etait entrain d'essayer de comprendre votre code ligne par ligne pour comprendre comment l'utilisé j'ai le manuel pdf dut site aussi donc je fait référence pour essayer de comprendre comment le code fonctionne