问答百科积统统怎么写 ACCESS查询-累积统计
1、键入命令areauser+空格+空格，选择闭合区域复合线，命令行显示面积统计值。2、键入命令areauser+空格+2+空格，选择复合线闭合区域内部任意处鼠标左键点击+空格+Y+空格，复合线区域显示面积统计值。
文章目录：
一、ACCESS查询-累积统计
由于你两个表中的数据余腔 不够完整 你应该 还有另外一个 厂区名称的表
通过厂区名称表 与 那两个月份的 产量表 来建立一个 查询……（厂区名称表竖启衫的ID 包含其他两个表的所有记录 这样的关系）1、2月份的产量分别重新命名 然后再增加一个 字段 表达式……
累计产量:Nz([1月旁闭份产量])+Nz([2月份产量])
解题思路：做一个新表，它包含《1月份产量》表的数字，用代码把《2月份产量》表的数字添加到新表中，这样两个表的数字都在《统计》表中了，电脑做统计就容易了。方法具体如下：
1 复制《1月份产量》表，把复制出来的新表，改名为《统计》，并在《统计》表中把“产量”字段名称改为“1月份产量”，并添加"2月份“字段 和 ”累计产量友唯态"两个字段名称。见图片。
2. 用下面的代码 把《2月份产量》表的数字添加到《统计》表中。
建一个窗体， 在窗体中添加一个命令按钮，在该命令按钮中添加下面代码，
Dim Ss As String
Dim Rs As ADODB.Recordset
Set Rs = New ADODB.Recordset
Ss = "select * from 统计 "
Rs.Open Ss, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
Rs.MoveFirst
Dim Ss2 As String
Dim J As Integer
Dim Rs2 As ADODB.Recordset
Set Rs2 = New ADODB.Recordset
Ss2 = "select * from 2月份产量 "
Rs2.Open Ss2, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
For 山皮J = 1 To Rs2.RecordCount
Rs.MoveFirst
Do While Not Rs.EOF
If Trim(Rs("厂区名称")) = Trim(Rs2("厂区名称")) Then
Rs("2月份产量") = Rs2("产量")
Rs("累计产量") = Rs("1月份产量") + Rs2("产量")
好源 GoTo 100
End If
Rs.MoveNext
Loop
Rs.AddNew
Rs("厂区名称") = Rs2("厂区名称")
Rs("2月份产量") = Rs2("产量")
Rs("累计产量") = Rs("1月份产量") + Rs2("产量")
100
Rs.Update
Rs2.MoveNext
Next J
Rs.Close
Rs2.Close
3. 打开窗体，点击命今按钮，让电脑运行代码程序，然后关闭窗体，打开《统计》表，你需要的答案就在该表中。
以上是问答百科为你整理的1条关于积统的问题，希望对你有帮助！更多相关积统的内容请站内查找。
