你的意思该是插入进去而不是覆盖后面的数据吧?

w$="要写的变量"
v$="DHSAT ="
v%=len(v$)


f$="t.txt"
f2$="t.tx2"

f%=freefile
open f$ for input as f%

f2%=freefile
open f2$ for output as f2%

do until eof(f%)
   line input #f%,a$
   i%=instr(1,a$,v$)
   if i%>0 then a$=left$(a$,v%)+w$+mid$(a$,v%+1)
   print #f2%,a$
loop

close #f%,#f2%
kill f$
name f2$ as f$

是先将文本全部导入,然后搜索,再插入,对吗?
不过这样效率太低了

哦？愿闻其详。

还有一个办法，如果我要做这种事我会用下面的办法，但不太能理解：


w$="要写的变量"
v$="DHSAT ="
v%=len(v$)


f$="t.txt"
f2$="t.tx2"

f%=freefile
open f$ for binary as f%
do until eof(f%)
   搜索字符
loop
找到位置，计算新文件长度
读写后面的数据。

但如果说有更好的办法，那就是硬盘级的技术了。

可以先把后面的删去，然后把删去的再加上你要加的字符，一齐打印在后面
应该可以吧。
f%=freefile
open f$ for input as f%
这个f%=freefile和 as f%我不明白。还请解释。

freefile 函数返回一个空闲的文件号
f% 就作为这个文件号变量

我再看看书。