Skip to content
View in the app

A better way to browse. Learn more.

MSFN

A full-screen app on your home screen with push notifications, badges and more.

To install this app on iOS and iPadOS
  1. Tap the Share icon in Safari
  2. Scroll the menu and tap Add to Home Screen.
  3. Tap Add in the top-right corner.
To install this app on Android
  1. Tap the 3-dot menu (⋮) in the top-right corner of the browser.
  2. Tap Add to Home screen or Install app.
  3. Confirm by tapping Install.

help with VB program

Featured Replies

hi everyone, here goes

im designing a program for wooden toys ltd, but im so stressed out with family problems that i cant think. and i need assistance asap.

i have two forms on this program, the first one you must enter a password the password at the minute is "OrderForm" i will change this when the program is complete, as soon as the correct password is entered a second form is loaded, this is an order form. i have some code already entered

what im wanting to do is, the customer selects there account number and their address is displayed in a list box (which i have done), then they choose which product they wish to order which then displays the product information in another list box (which i have also done), i have also programmed the two clear buttons, then i want them to enter the quantity required then i want the program to add these up then add vat at 17.5% and then display the total price, then display all of this in a list box on the left. i have included my program in this thread, requires visual basic to run.

if anyone could help me that would be great, thanks

if you need anymore imformation PM me

Wooden_toys_ltd.zip

  • 2 weeks later...

Here this is what i came up with

Dim BB As Integer
Dim FS As Integer
Dim TS As Integer
BB = 15 'Set Price you want
FS = 25 'Set Price you want
TS = 33 'Set Price you want
Dim PriceBB As Integer
PriceBB = BB * txtQuantity.Text
Dim PriceFS As Integer
PriceFS = FS * txtQuantity.Text
Dim PriceTS As Integer
PriceTS = TS * txtQuantity.Text
If lstDetails.Items.Contains("Building Blocks") Then
lblPrice.Text = PriceBB
ElseIf lstDetails.Items.Contains("Farm Set") Then
lblPrice.Text = PriceFS
ElseIf lstDetails.Items.Contains("Train Set") Then
lblPrice.Text = PriceTS
End If
lblVat.Text = (lblPrice.Text * 0.175)
lblTotalPrice.Text = (lblPrice.Text * 117.5) / 100

This code works but it isnt what your really looking for

it will show you the price + Vat and the total price

but it can only do this for one item in the list

im still a noob in VB so maybe you can fix this code to suit your needs or see what others have to say!

Edited by shooter468

Create an account or sign in to comment

Recently Browsing 0

  • No registered users viewing this page.

Account

Navigation

Configure browser push notifications

Chrome (Android)
  1. Tap the lock icon next to the address bar.
  2. Tap Permissions → Notifications.
  3. Adjust your preference.
Chrome (Desktop)
  1. Click the padlock icon in the address bar.
  2. Select Site settings.
  3. Find Notifications and adjust your preference.