Posts
 
Reputation
Joined
Last Seen
0 Reputation Points
Unknown Quality Score

No one has voted on any posts yet. Votes from other community members are used to determine a member's reputation amongst their peers.

0 Endorsements
~2K People Reached
Favorite Forums
Favorite Tags
Member Avatar for anonimous

[CODE]If ListView1.SelectedItems.Count = 0 Then MsgBox("Plese Select a Product") Else Dim price As Double Dim quantity As Integer Dim total As Double price = ListView1.FocusedItem.SubItems(3).Text quantity = ListView1.FocusedItem.SubItems(2).Text If txtProductName.Text = "Happy" Then If txtQuantity2.Text > 20 Then total = price * Val(txtQuantity2.Text) * 0.95 total = Format(total, "0.00") execute("insert …

Member Avatar for Capritarius21
0
111
Member Avatar for anonimous