Hente seneste 6 nyheder og placere dem i forskellige labels

Jeg har planer om at hente de seneste 6 myheder på min webside frem på min forside i 6 bokse af forskellig størrelse og placering (en stor, to mellem og 3 små).

Dertil har jeg oprettet nogle tabeller med nogle labels

lblNyhed1Dato
lblNyhed1Overskrift
lblNyhed1Indhold

lblNyhed2Dato
lblNyhed2Overskrift
lblNyhed2Indhold

osv op til nyhed6

Jeg har forbindelse til min Access database gennem de oprettede OleDbConnection, OleDbDatareader og OleDbCommand

Følgende SQL er oprettet:
SQL = "SELECT TOP 6 Titel, Indhold, NyhedsDato FROM indhold ORDER BY NyhedsDato"

Jeg åbner forbindelsen, kører min SQL og indlæser i min datareader. Og herefter famler jeg i blinde.

Mit første forsøg var noget i retning af:

Dim i As Integer
If NewsReader.Read = True Then
  For i = 1 To 6
    lblNyhed1Overskrift.Text = NewsReader("Titel").ToString.Trim()
  Next
End If

Hvor jeg ville løbe min kode igennem 6 gange for at hente de seneste 6 nyheder og indsætte dem i tilhørende labels.

Men jeg er enten kørt fast i ovenstående kode - ellers er jeg langt fra, hvor jeg burde være og skal have hjælp til at komme tilbage på sporet med en bedre / rigtig kode