This is a simple code but I coudlnt' figure out how to removeitem from the combo box. Any help, please

I want to add from letter "A" to "Y" to the cboRev.  except "I" "O" "Q" "S" and "X"

Thx

     istart = 65 ' Start with letter "A"

    iEnd = 89   ' End with letter "Y"

    iSkip(0) = 73 'Letter "I"

    iSkip(1) = 79 'Letter "O"

    iSkip(2) = 81 'Letter "Q"

    iSkip(3) = 83 'Letter "S"

    iSkip(4) = 88 'Letter "X"

              iListIndex = 0

              For i = istart To iEnd

                cboRev.AddItem Chr(i) 'Add letter "A" to "X" to the cboRev

                iListIndex = iListIndex + 1

                For j = 0 To 4

                    If i = iSkip(j) Then cboRev.RemoveItem (iListIndex - 1)

                Next

            Next