Hola quien me puede ayudar. estoy realizando una consulta con los sig. campos

Proveedor      descripcion       entrada                stock
(text)                (text)             (numero             (numero)

la base de datos esta en acces y uso vb6.

tengo 2 combobox y un texbox y boton guardar

cuando tecleo la opcion de combo2 envio una consulta asi:

Private Sub Combo2_CLICK()
  Dim rST As ADODB.Recordset
    Set rST = New ADODB.Recordset
    With rST
        .ActiveConnection = "Provider=Microsoft.jet.OLEDB.4.0;Data Source=" & _
           "C:\almacen\almacen.mdb"
     .CursorType = adOpenStatic
   .CursorLocation = adUseClient
  .Open "select entrada from stock where PROVEEDOR='" & Combo1 & " and DESCRIPCION=" & Combo4 & "'"
Text2.Text = rST!entrada

End With
End Sub

y deseo que el textbox me muestre el valor de la consulta que realizo es decir un valor del campo "entrada", eso para que con ese valor  despues lo sume a mi stock, pero me marca error "la operaciones solicitada requiere un registro actual. porque me marca eso, algui que pueda ayudarme, los combobox solo jalan campos en lectura de mi BD. y me muestran todo los registros que tengo. pero mi textbox no muestra nada.

de ante mano le agradezco al que me pueda ayuda. muchas gracias

Ya he intentado pero no logro que me envie la consulta a mi textbox, puedes ayudarme con el codigo si no es mucha molestia. Realmente apenas me inscribi en elhacker pero desde hace vario tiempo entro y leo cosas cuando necesito algo.

Saludos.

Me parece que no funciona porque estas dentro del WITH.

Prueba colocando la asignacion afuera del bloque.

Saludos!

coincido y alerto aunque no soy un experto que hay algo malo cerca de

 Text2.Text = rST!entrada 

+1. Le faltan las comillas simples para identificar el valor del campo como texto...