input "Please enter a string: "; s$
while i <> 75000
    input "Please enter 75000   : "; i
wend
print
print s$; chr$(9); i