• Home
 · 
• Custom Controls/Forms/Menus
 · 
• Check Combo for the existing Data and scans for new entry in combo box

Check Combo for the existing Data and scans for new entry in combo box

Check Combo for the existing Data and scans for new entry in combo box

API Declarations


Set VH = DB.OpenRecordset("Vehicle")




Rate Check Combo for the existing Data and scans for new entry in combo box

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

Combo1.Clear
VH.Index = "VehIDNo"
    If VH.RecordCount > 0 Then
        VH.MoveFirst
        Combo1.Text = VH(0)
        Combo1.AddItem VH(0)
        Do While Not VH.EOF
            If Combo1.Text <> VH(0) Then
                Combo1.AddItem VH(0)
            End If
            Combo1.Text = VH(0)
            VH.MoveNext
       Loop
    End If
Combo1.Text = ""
End Sub