誰でもこのロジックの問題を見ることができますか?
正しいacqCodeが見つかったとしても、コードが次のページに進む無限ループに陥っているようです。
flagFound = 0
Do
If StrComp(temp1, acqCode) = 0 then
Print #iOutFileNum, "It's 1st!!!! :)"
flagFound = 1
Elseif StrComp(temp2, acqCode) = 0 then
Print #iOutFileNum, "It's 2nd!!!! :)"
flagFound = 1
Elseif StrComp(temp3, acqCode) = 0 then
Print #iOutFileNum, "It's 3rd!!!! :)"
flagFound = 1
Elseif StrComp(temp4, acqCode) = 0 then
Print #iOutFileNum, "It's 4th!!!! :)"
flagFound = 1
Elseif StrComp(temp5, acqCode) = 0 then
Print #iOutFileNum, "It's 5th!!!! :)"
flagFound = 1
Elseif StrComp(temp6, acqCode) = 0 then
Print #iOutFileNum, "It's 6th!!!! :)"
flagFound = 1
Else
If flagFound = 0 then
'go to next page
End If
End If
Loop Until flagFound = 1'to end Do While