怎么添加一行到文件首行？

文件内容如下：
行1   111
行2   222
行3   333
......
行n   nnn

要在文件的首行添加一行：
文件编号   文件内容


我看到一些帖子提到的方法：新建一个文件，写入第一行，再读取原来的文件，把全部内容再添加到新文件里面。这样可以达到目的，但是我的文件很多，体积也有10G左右，不想反复读写这么多数据，速度太慢而且也不科学。希望可以有速度快的办法，而且不要重新建立新的文件来储存。 --------------------编程问答-------------------- 直接插入首行基本不可行，除非直接操作文件分配表,但所面临的情况会更复杂,所用时间可能会更慢;其实又何必纠结“首行”，添加到尾部，然后“倒过来”看不就是“首行”了? --------------------编程问答-------------------- 换一个思路
假设已经有的文件为B
先生成要插入行的一个文本文件A
用Shell执行Copy A+B
--------------------编程问答-------------------- 很想知道哪位高人为啥要设计这种10G大小的文件的读写规范：( --------------------编程问答--------------------
先了解一下磁盘文件的存储原理，然后再来问。
--------------------编程问答-------------------- 可以加在最后一行。 --------------------编程问答-------------------- 换句话说，先读内容并保存，在清文件，加入一行，在把保存的加在后面。 --------------------编程问答--------------------
如果你的文件行是等长的，且原来的第一行可以移到最后：

1 用二进制方式打开文件；//Open "yourfile.txt" For Binary As #1

2 读第一行到变量缓存；  //Get #1, 0, bytBuffer

3 将你现在的第一行写入文件；//Put #1, 0, bytHeader

4 写缓存的原第一行到文件尾；//Put #1, LOF(1), bytBuffer

5 关闭文件。//Close #1 --------------------编程问答-------------------- 先读取整个文件，再写

补充：VB ,  基础类