Hi i need some help as my logics have just die on me for a week ok let get down to the point I am designing a small program like a quiz the problem comes how do i move onto the next line in sequential file ok here is my code

Open (App.Path & "\txtquestion.txt") For Input As Myfile
' so it open the file fine no probs
Input #Myfile, QuestionA

Input #Myfile, answerA
Input #Myfile, opA
Input #Myfile, answerB
Input #Myfile, opB
Input #Myfile, answerC
Input #Myfile, opC
Input #Myfile, answerD
Input #Myfile, o

loads all of the above fine no probs


this is where the problem starts so please help me as i said my head is a bit dead and has been dead for a week you know the feeling sometime .

Private Sub lblnext_Click()


Do While Not (EOF(1))

Line Input #1, QuestionA
txtquestion.Text = Trim$(QuestionA)
Line Input #1, opA
txtopA.Text = Trim$(opA)

Line Input #1, opB
txtopB.Text = Trim$(opB)

Line Input #1, opC
txtOpC.Text = Trim$(opC)

Line Input #1, opD
txtOpD.Text = Trim$(opD)

this is where i can't sort my self out it goes throught the loop ok but just how just how do i stop the loop so when the user is ready to move onto the next question he/she just clicks on the command button u know next for next question ...

please email me on [email protected] please help me
i am frusrated as i know the answer but can't wirte it down u know what i mean.....


Loop