INPUTCSV "|", #diary, trans$(t,1), trans$(t,2), trans$(t,3), trans$(t,4), trans$(t,5), trans$(t,6)
line input #diary, trans$ for n = 1 to 6 trans$(t,n) = word$(trans$,n,"|") if trans$(t,n) = "|" then trans$(t,n) = " " next
' line input #teacherFile, teacherRec$ ' lname$ = word$(teacherRec$,1,".") ' fname$ = word$(teacherRec$,2,".") ' initial$ = word$(teacherRec$,3,".") ' gender$ = word$(teacherRec$,4,".") ' degree$ = word$(teacherRec$,5,".") ' major$ = word$(teacherRec$,6,".") ' minor$ = word$(teacherRec$,7,".") ' years$ = word$(teacherRec$,8,".") ' tenure$ = word$(teacherRec$,9,".") ' homeRoom$ = word$(teacherRec$,10,".") INPUTCSV ".", #teacherFile, lname$,fname$,initial$,gender$,degree$,major$,minor$,years$,tenure$,homeroom$
|