Lo he solucionado momentaneamente, de chapuza, pero por ahora me sirve. Declaro un objeto de tipo DataRow, y le tiro un objeto de tipo OleDbDataAdapter como si fuera el viejo recordset. Luego en una variable ya declarada bajo el valor del campo que necesito:
Dim vencimiento As String
Dim reg As DataRow
reg = dsUsu.Tables(0).Rows(0)
vencimiento = reg("vencimiento")
Solo queda Databindear todos los objetos de la pagina. Puedo imprimirlo por pantalla para verificar que obtuve lo que queria.
Page.DataBind()
Response.Write(vencimiento)
seguramente habra una forma de hacer esto de forma mas tecnica, pero es lo que hay.
Saludos.