这程序不断的吃内存，可是上就这几行代码，看看那里不对

Question

试试：
Private Sub Timer1_Timer()
'时间间隔为0.1秒
Set Databasname = OpenDatabase("E:\DataBase\2002_12.mdb")
Realtime = Date + Time
Databasname.Execute ("INSERT INTO [Table1] (流水号,时间) VALUES (1,'" + Realtime + "');")
Databasname.close
Set Databasname = Nothing 
End Sub

Answer 1

of123好奇怪，
打开又关闭。这不是增加系统的负担嘛？

Answer 2

可以每隔一分钟释放一次：）

Answer 3

自己控制释放内存，这是好习惯！
虽说vb会自动释放局部变量，但~~~~~~

Answer 4

试试of123()的方法，有效也说不定。

Answer 5

实际上，当你打开一个对象时，如文件、数据库、记录集，系统将为其分配虚拟内存（包括物理内存和磁盘交换文件）。
当你添加内容时，例如添加记录，并不是直接写磁盘文件，而是进入缓存（主要是内存），以提高运行速度。只有你关闭对象时，系统才执行写磁盘，并释放内存。建议：
不要实时添加记录。你可以建立一个固定维数的数组，每0.1秒采集数据，写入数组。当达到数组上限时，建立数据库连接，添加记录，断开连接，数组指针复位。这样既快，也不会增长式地吃内存。