标题: 在处理数据时溢出问题 [打印本页] 作者: taogon 时间: 2006-11-28 16:28 标题: 在处理数据时溢出问题 Dim str As String
Dim i As Integer
Dim rs As New ADODB.Recordset
str = "select * from 汇总表"
rs.Open str, CurrentProject.Connection, adOpenStatic, adLockOptimistic
rs.MoveFirst
Do While Not rs.EOF
rs("金额") = 2
rs.MoveNext
Loop
在处理汇总表中数据条数超过9494条记录时会出现溢出现象,不知到是什么原因,望高手指点