Visual Basic - How do I assign values to SelectedIndex items in a drop-down list?

[rylew0925]

I've hit an obstacle. I just want to learn how I can assign SelectedIndex items with the declared costs? I feel like I am missing something obvious.

I have declared the costs of the taco types but I am not sure how I can assign them to the SelectedIndex items for the `ddlTacoType` in Visual Basic. Is it a good idea to use a switch statement? Ideally, the output should display the cost as 8.99 when the user selects "Chipotle Chicken."

Any help would be much appreciated.

Cheers,

Richard

[Screenshot of Output][1]

```
' Project: Street Tacos Order Form
' Author: Richard Lew
' Date: November 3, 2019
' Purpose: The web application allows a customer to fill out a street taco order form.

Public Class About
Inherits Page
Private _decChicken As Decimal = 8.99
Private _decPork As Decimal = 9.99
Private _strFish As Decimal = 12.99
Private _strBeef As Decimal = 13.99
Private _strExtra As Decimal = 0.99
Protected Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs) Handles Me.Load

End Sub

Protected Sub btnSubmit_Click(sender As Object, e As EventArgs) Handles btnSubmit.Click
' The btnSubmit click event will calculate the cost of the street tacos
' based on the type of tacos selected.

' Declare and initialize variables
Dim decTacoCost As Decimal
Dim decFinalCost As Decimal
Dim decTotalCost As Decimal
Dim decChickenCost As Decimal = 8.99D
Dim decPorkCost As Decimal = 9.99D
Dim decFishCost As Decimal = 12.99D
Dim decBeefCost As Decimal = 13.99D
Dim decExtraCost As Decimal = 0.99
Dim strName As String
Dim strAddress As String
Dim strPhone As String
Dim decOrderCost As Decimal = 0D
Dim strMessage As String

' Trim additional spaces that are entered by the user
strName = txtName.Text.Trim
strAddress = txtAddress.Text.Trim
strPhone = txtPhone.Text.Trim

' Clear the Order Message
lblOrder.Text = ""

' Ensure a Taco Selection is Selected
If ddlTacoType.SelectedIndex < 0 Then
lblTacoTypeError.Visible = True
Else
lblTacoTypeError.Visible = False
End If
' Ensure a Topping is Selected
If Not (chkRedChili.Checked Or chkGreenChili.Checked Or chkBeans.Checked Or chkCream.Checked Or chkLime.Checked Or chkNoToppings.Checked) Then
lblToppingsError.Visible = True
Else
lblToppingsError.Visible = False
End If

' Calculate the cost of the Taco(s) selected by the user
Select Case decTotalCost
Case 0
decTacoCost = decChickenCost
Case 1
decTacoCost = decPorkCost
Case 2
decTacoCost = decFishCost
Case 3
decTacoCost = decBeefCost
Case 4
decTacoCost = decExtraCost
End Select



End Sub
End Class
```

When the user selects a taco type in the `ddlTacoType` drop-down list, the program should associate the item with its cost and calculate the total cost of the selected item at the end of the program.


[1]:

https://imgur.com/cqVy6

View: https://i.stack.imgur.com/cqVy6.png


Continue reading...