combo relacionado DATAREADER

[ncsa]

Hoola ! Soy nuevo en esto, os queria hacer una consulta. Graacias ! Aprendo mucho leyendoos

Ya consigo rellenar mi combobox con DataReader en vez de con DataSet(por exigencias, no puedo usar ningun dataset, sii ya, es una p*****) , pero ahora trato de que me coja el valor de lo seleccionado y dependiendo de este que me carge un segundo combobox .

El primer combo se rellena con categorias, y el segundo trata de subcategorias.

Hasta ahora tengo esto en el indexchange del primer combo , pero da error. Quisiera que me dijerais que error tengo.Gracias, Saludos

Try
conexion.ConnectionString = cadenaconx
consulta = "SELECT nombreSub, nombreCat FROM Categorias,
Subcategorias WHERE Categorias.codCat = Subcategorias.codSub
AND Categorias.nombreCat = '" & Me.cmbosub.SelectedValue & "'"

Comando = New SqlCommand(consulta, conexion)
conexion.Open()
CDataReader = Comando.ExecuteReader()

While CDataReader.Read()
Me.cmbsub.Items.Add(CDataReader("nombreSub"))

End While
CDataReader.Close()
conexion.Close()
Catch ex As Exception
MsgBox(ex.Message)
End Try