因为你Dim lByte As Byte 没有声名数组， lSWiter.WriteByte(Nothing) '这句话也是错误的，你把文件流给写入空了，所以第二次运行打开文件就没有数据了。 多调试，跟踪数据，可以多学点经验。
