Accumulating Sum in Label

[MiziaQ]

Look at the following code:

Dim LaptopPrice As Integer
Dim HDDPrice As Integer
 
'Prices of Laptops
Const LongitudePrice As Integer = 200
Const PerspironPrice As Integer = 350
Const IncisionPrice As Integer = 500
 
'Prices of Hard Drives
Const 40GBDrivePrice As Integer = 0
Const 80GBDrivePrice As Integer = 80
Const 120GBDrivePrice As Integer = 120
 
If optLongitude.Value = True Then
  LaptopPrice = LongitudePrice
ElseIf optPerspiron.Value = True Then
  LaptopPrice = PerspironPrice
ElseIf optIncision.Value = True Then
  LaptopPrice = IncisionPrice
 
ElseIf opt40GBDrive.Value = True Then
  HDDPrice = 40GBDrivePrice
ElseIf opt80GBDrive.Value = True Then
  HDDPrice = 80GBDrivePrice
ElseIf opt120GBDrive.Value = True Then
  HDDPrice = 120GBDrivePrice
Else
  MsgBox "Please make a selection", vbExclamation, "Make Selection"
End If

Now I want to display the total price in a label, once the user selects a particular option button. For example if longitude is selected, the label should show 200, then if a 120GB drive is chosen, the total should display 300, and so on. How do I concatenate the two integers in a label?

I tried:

lblSum.Caption = LaptopPrice + HDDPrice
lblSum.Caption = LaptopPrice & HDDPrice

None of these work

Please help, thanks in advance!

[Killer42]

Since you're dealing with numbers, I seriously doubt that concatenation is what you intend. More likely you want to add the numbers.

In any case, this code can only ever set LaptopPrice or HDDPrice, not both. Because the whole If...ElseIf... structure makes them mutually exclusive. Keep in mind that since they are all "else" clauses, as soon as one test is true, everything else will be skipped.

Also, please don't stop at "it doesn't work". Give us details of what did or didn't happen unexpectedly.