Set variable to a combobox selected value

See more:

VB

This should be simple, but for the life of me I can't figure it out.

Private Sub cboCustomer_SelectedValueChanged(sender As Object, e As EventArgs) Handles cboCustomer.SelectedValueChanged
        If cboCustomer.SelectedIndex >= 0 Then
            lngID = CLng(cboCustomer.SelectedItem)
            Debug.Print("lngID = " & CStr(lngID))
        End If
    End Sub

There is only one value in the customers combobox and that is the only customer ID of 1

I get this exception

InvalidCastException was unhandled by user code

and I don't know why this exception is being thrown. All I am doing is assigning the "SelectedValue" from the combobox into a lngID so I can run a query and return the proper results.

Can someone tell me why this is happening and what I need to do to rectify the problem

What I have tried:

If I knew why it is happening I might be able to rectify the problem.