como hago para referenciar un comboBox de VB.NET en una sentencia SQL

[fredy666]

Me sale una cosa rara cuando intento hacer el combo.selecteditem.tostring, no me coge el valor que esta seleccionado.
Utilizo esto:

Private Sub cmbCategoria_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmbCategoria.SelectedIndexChanged
MsgBox(cmbCategoria.SelectedItem.ToString())
End Sub

¿Alguna otra soluion?

Gracias