Puedes hacer un "Select * From Tabla"
y en el clic del botón puedes tener algo como esto:
Static NumeroDeCampo as integer
if NumeroDeCampo > rst.fields.count-1 then NumeroDeCampo
txtTextBox = Rst(NumeroDeCampo)
NumeroDeCampo =NumeroDeCampo +1
Saludos, Javier J