a cancel/close commands to stop the running of the messagebox?

[gilgalbiblewheel]

How can I put a cancel/close commands to stop the running of the messagebox? (the records are thousands of records long).

    While rs.EOF <> True
        MsgBox (rs("book_title") & " " & rs("chapter") & ":" & rs("verse") & " " & rs("text_data"))
        rs.MoveNext
        
    Wend

Or do you have a better suggestion? Instead of coding msgBox what way can I put a table of records?

 

[FrancisL]

Use a data grid