Access - Incrementar el numero de registro

Hola.
Tengo una tabla con una serie de pensamientos filosoficos y me gustaria que cada vez que alguien abriera el formulario que contiene el subformulario con las frases, me cogiera un registro distinto.
Como puedo hacerlo?.
Gracias.

Tienes dos formas, una te creas un campo contador en la misma tabla de las frases y te vas ha ese registro, muestras la frase y actualizas el contador poniendo una marca, cuando llegue al último registro borras todas las marcas del contador y vuelves a empezar. La otra forma es con un randomize:

Dim rs As Recordset
Set rs = CurrentDb.OpenRecordset("Select * from tabla_de_frases")
Randomize
rs.MoveLast
a = Int((rs.RecordCount * Rnd) + 1)
rs.AbsolutePosition = a
lbldato.Caption = rs!campofrase & ""