• Home
 · 
• Miscellaneous
 · 
• Procedure that saves the text typed into a combobox into the comboboxes list. Like Internet Explore

Procedure that saves the text typed into a combobox into the comboboxes list. Like Internet Explore

Procedure that saves the text typed into a combobox into the comboboxes list. Like Internet Explorer address bar.

Rate Procedure that saves the text typed into a combobox into the comboboxes list. Like Internet Explore

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

On Error GoTo Err:

Dim val As String
Dim i As Long
Dim match As Boolean

val = Trim(cboName.Text)

For i = 0 To cboName.ListCount - 1       
    If cboName.List(i) = val Then   
        match = True                 
        Exit For                    
    Else
        match = False
    End If
Next i 
                             
If match = False Then
    cboName.AddItem val
    'You could add code here to save the values
    'to a file or registry or something like that
    'so they can be loaded back in next time 
    'program is started
End If

Exit Sub
Err:

MsgBox "Sorry, there was an error!. " & vbCrLf & _
       "Please try again.", vbExclamation, "Error"
End Sub