I solve my problem sorry convincing all of you guys. Sorry
If Discount1.SelectedItem = "Regular Fare" Then
counts1 = Discount1.SelectedItem
count123 = 1
totalseats = types12
totalseats = types12 - ticket123
total123 = ((destination123 + types123) * ticket123)
Tamount123 = total123 * count123
SeatsTicket.Text = totalseats
AmountTicket.Text = Tamount123
Else If Discount1.SelectedItem = "Student Fare" Then
counts1 = Discount1.SelectedItem
count123 = 0.80
totalseats = types12
totalseats = types12 - ticket123
total123 = ((destination123 + types123) * ticket123)
Tamount123 = total123 * count123
SeatsTicket.Text = totalseats
AmountTicket.Text = Tamount123
Else If Discount1.SelectedItem = "Senior Citizen Fare" Then
counts1 = Discount1.SelectedItem
count123 = 0.80
totalseats = types12
totalseats = types12 - ticket123
total123 = ((destination123 + types123) * ticket123)
Tamount123 = total123 * count123
SeatsTicket.Text = totalseats
AmountTicket.Text = Tamount123
Else If Discount1.SelectedItem = "PWD Fare" Then
counts1 = Discount1.SelectedItem
count123 = 0.80
totalseats = types12
totalseats = types12 - ticket123
total123 = ((destination123 + types123) * ticket123)
Tamount123 = total123 * count123
SeatsTicket.Text = totalseats
AmountTicket.Text = Tamount123
End If