实时保存数据(VB6.0)过程中如何创建内存缓冲区和新线程

由于需要实时存储数据到文本文件,如果每次存入单个数据都要打开和关闭一次文本文件,存储速度会滞后。设想开辟了两个内存缓冲区（比如1K大小），先开启一个缓冲区保存数据,一旦写满后启动另一个线程将数据写入到文本文件,同时开启另一个缓冲区继续接收数据。接收的数据为字符串类型,编程环境为VB6.0,请大虾们给出代码提示?

其实这不需要，系统会自动完成的。