do while not eof(mark)
    for i=1 to 8
        if eof(mark) then exit form
        read data you want
        print data_you_read
    next
    print vbcrlf
loop

Hold by this principle,u~ll meet the requirements of your own
good luck
[em12]

多年项目开发经验,专业做毕业设计等中小型项目开发,熟悉各种数据库操作(sql server ,access ,mysql等),熟练应用VC, Delphi, VB, ASP, C#等开发语言.若有需要请联系QQ: 383147818 加我请注明: pfan项目