i have program with listbox which hold multiple string
using
list1.additem CI &";"& Quantity &";"& itemunitprice
the subprogram look as following
what i went to do is multiple Quantity with itemunitprice from the listbox then move to secound item in the list doing the same thing
then adding them up and displaying them in balance textbox
any help are apreciated thx
update:
my problem nearly solved , one last thing
Dim A As String
Dim B As String
Dim c As String
Dim l As Integer
For l = 0 To List1.ListCount
TXTB = 0
If List1.Selected(l) = True Then
A = Split(List1.List(l), ";" & ";")(1)
B = Split(List1.List(l), ";")(1)
c = Val(A) * Val(B)
End If
l = l + 1
TXTB = TXTB + Val(c)
Next l
End Sub
does that look right , for the purpose of looping throgh the listbox ?
Question
Ci7
hello ,
i have program with listbox which hold multiple string
using
the subprogram look as following
what i went to do is multiple Quantity with itemunitprice from the listbox then move to secound item in the list doing the same thing
then adding them up and displaying them in balance textbox
any help are apreciated thx
update:
my problem nearly solved , one last thing
does that look right , for the purpose of looping throgh the listbox ?

Edited by skynetXrulesLink to comment
Share on other sites
5 answers to this question
Recommended Posts