vb Code:
open "file1.txt" for input as 1 'supply path as required
filearray = split(input(lof(1), #1), vbnewline) 'read whole file into array
close 1
filearray(36) = newvalue ' array is zero based so line 37 is element 36
' you can change as many elements of the array as you like before saving
' but you will need to declare the array in the general section at the top of the form or module
open "file1.txt" for output as 1 ' if you want new file supply new file name instead of overwriting
print #1, join(filearray, vbnewline) ' write array to file
close 1