TE ENVIO ESTE CODIGO QUE TE PUEDE SERVIR, TIENES QUE ACTUALIZAR EN ALGUNA PARTE DEL PROGRAMA, EL OLEDBADAPTADOR TAL COMO EN EL EJEMPLO CON LA CONSULTA, SELECCIONANDO LOS CAMPOS QUE DESEAS MOSTRAR, EL NOMBRE DE ESTOS LOS PUEDES CAMBIAR APLICANDO LA INSTRUCCION \"AS\" ( CAMPO AS NUEVO_NOMBRE).
ESPERO QUE TE SIRVA
DataSetDetalle2.Clear()
OleDbAdaptador2.SelectCommand.CommandText = \"SELECT CODACTA ,NUMITEM ,CODARTICULO ,CANTARTICULO ,VALORUNITARIO FROM TABLA where codacta = \" & Val(TxtCor.Text)
OleDbAdaptador2.Fill(DataSetDetalle2)