[VB2010] Settare index su combobox popolata da codice

[Neo996sps]

Ciao a tutti,

in un form ho una combobox che viene popolata prelevando i dati da una tabella MySQL tramite questa funzione che ho scritto:

Public Function PopolaCategoriaClienti()
        db.apri()
        Dim stringa As String = "SELECT * FROM TblCategoriaClienti"
        Try
            Dim popola As New MySqlCommand
            popola.Connection = db.conn
            popola.CommandText = stringa
            popola.CommandType = CommandType.Text
            Dim reader As MySqlDataReader = popola.ExecuteReader()
            While (reader.Read())
                frmClienteNuovo.cmbCategoria.Items.Add(reader("categoria"))
            End While
            reader.Close()
            Return True
        Catch ex As Exception
            Return False
            MsgBox("Errore")
        End Try
    End Function 

Il controllo viene regolarmente popolato e i dati possono essere selezionati. Il mio problema è che vorrei settare manualmente il valore index, associandolo alla colonna dedicata alla chiave primaria che è di tipo numerico.
Ingenuamente avevo scritto questo:

frmClienteNuovo.cmbCategoria.Items.Add(reader("id"), reader("categoria")) 

nella speranza che funzionasse ma purtroppo si genera l'errore "too many arguments" e via dicendo.

Qualcuno mi sa dare un input su come risolvere?


--- EDIT

Ho provato anche questa soluzione ma non viene popolato il controllo

cmbCategoria.Items.Insert(reader("id"), reader("categoria"))