How to reset combobox to default value after use

I have a combobox that is populated with items according to the user's input. The combobox's default text is "Select Section Character." My problem is that after the user has made a selection, the combobox does not reset to display "Select Section Character" for the next use. Instead, it still displays the user's previous selection. I have tried everything but can't get it to work.

Here is my code that populates the combobox:

Private Sub btnWordLengthSubmit_Click(ByVal sender As Object, _
        ByVal e As System.EventArgs) Handles btnWordLengthSubmit.Click

cboSelectSectionCharacter.Items.Clear()
        cboSelectSectionCharacter.Items.Add(strLeadName)
        cboSelectSectionCharacter.Text = "Select Section Character"

        Select Case dblWordLength
            Case 50000 To 64000
                cboSelectSectionCharacter.Items.Add(strVP2)
            Case 65000 To 89000
                cboSelectSectionCharacter.Items.Add(strVP2)
                cboSelectSectionCharacter.Items.Add(strVP3)
            Case 90000 To 114000
                cboSelectSectionCharacter.Items.Add(strVP2)
                cboSelectSectionCharacter.Items.Add(strVP3)
                cboSelectSectionCharacter.Items.Add(strVP4)
            Case 115000 To 139000
                cboSelectSectionCharacter.Items.Add(strVP2)
                cboSelectSectionCharacter.Items.Add(strVP3)
                cboSelectSectionCharacter.Items.Add(strVP4)
                cboSelectSectionCharacter.Items.Add(strVP5)
            Case 140000 To 154000
                cboSelectSectionCharacter.Items.Add(strVP2)
                cboSelectSectionCharacter.Items.Add(strVP3)
                cboSelectSectionCharacter.Items.Add(strVP4)
                cboSelectSectionCharacter.Items.Add(strVP5)
                cboSelectSectionCharacter.Items.Add(strVP6)
        End Select


And here is the code for when the user makes a selection in the combobox:


    Private Sub cboSelectSectionCharacter_SelectedIndexChanged(ByVal sender As Object, _
        ByVal e As System.EventArgs) Handles cboSelectSectionCharacter.SelectedIndexChanged

        Dim strNodeName As String = treNovelStructure.SelectedNode.Name
        Select Case strNodeName
            Case "8"
                strVPCharacterOfSection8 = cboSelectSectionCharacter.SelectedItem
                txtSectionCharacter.Text = strVPCharacterOfSection8
                DrawTree()
                Dim node() As TreeNode = treNovelStructure.Nodes.Find("8", True)
                If Not node.Length = 0 Then
                    treNovelStructure.SelectedNode = node(0)
                End If
                treNovelStructure.Focus()
                treNovelStructure.SelectedNode.BackColor = Color.MidnightBlue
...
End Select
    End Sub

I also have the combobox's text property set to "Select Section Character."

What am I doing wrong/not doing? Any help will be greatly appreciated. Many thanks in advance.
evanmarshallAsked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

inthecurveCommented:
You need to add "Select Section Character" as an item, not just set the Text of the combo box.
0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
Jorge PaulinoIT Pro/DeveloperCommented:
>> You need to add "Select Section Character" as an item, not just set the Text of the combo box.

Do you have the "Select Section Character" on the combobox like inthecurve suggest it ?
0
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Visual Basic Classic

From novice to tech pro — start learning today.