[Resolved] combo box help

i have four combo boxes in my form, each combo box has 2 or 3 selections

i need to check each combo box for a selection, if nothing is selected i need to have a error message come up in a message box

each selection in the combobox is woth different points so i am using a counter and when the user click the button it shows the total points in a message box

Code:

---

If cmbAge.SelectedIndex = -1 Then
    MessageBox.Show("Please Select Your Age", "Error")
    cmbAge.Focus()
    If cmbAge.SelectedIndex = 0 Then
          intPtsCnt = intPtsCnt + 1
    ElseIf cmbAge.SelectedIndex = 1 Then
          intPtsCnt = intPtsCnt + 2
    ElseIf cmbAge.SelectedIndex = 2 Then
          intPtsCnt = intPtsCnt + 3
    End If
End If

---

i have one of these for each combo box

when i run the program and click the button all 4 error message boxes show up then it shows the total points, i want it to go through each combo box one at a time

Try using Exit Sub method at the end of each If and ElseIf :

VB Code:

If Me.ComboBox1.SelectedIndex = -1 Then
            MessageBox.Show("Please Select Item from Cbox1 ", "Error")
            Exit Sub
 
        ElseIf Me.ComboBox2.SelectedIndex = -1 Then
            MessageBox.Show("Please Select Item from Cbox2", "Error")
            Exit Sub
 
        ElseIf Me.ComboBox3.SelectedIndex = -1 Then
            MessageBox.Show("Please Select Item from Cbox3", "Error")
            Exit Sub
 
        End If

thanks, i got it to work

Quote:

---

Originally posted by salating
thanks, i got it to work

---

Can you edit the thread title and add [Resolved] tag . :)