The problem is very simple (In VB.6). When the user select and item y cboprovincia, i want to fill out other combo with the following select

The problem is that when the user selected the item in the combo: Nothing happens.

Any Help?

Private Sub CboProvincia_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CboProvincia.SelectedIndexChanged

Dim oDB As New Utilitarios
Dim SqlString = "Select * From provincia where codigo_provincia= '" & CboProvincia.SelectedItem.ToString & "'" _
& " and codigo_zona='000' and codigo_ciudad <> '000' " _
& " order by codigo_provincia,codigo_ciudad "
Me.cboCiudad.DataSource = oDB.GetDataTable(SqlString, CommandType.Text)

Me.cboCiudad.DataTextField = "descripcion"
Me.cboCiudad.DataValueField = "id"
Me.cboCiudad.DataBind()
Me.DataBind()
End Sub