Question

VB编程，数据库中有二个字段，状态描述和数量，如何一次性统计相同状态描述的数量？

VB编程，数据库中有二个字段，状态描述和数量，如何一次性统计相同状态描述的数量？
rs.Open "select * from 计划", cnn, 3, 1
zt = ""
Do While Not rs.EOF
Me.MSFlexGrid1.TextMatrix(TotalRow, 0) = TotalRow

If zt <> rs("状态描述") Then
zth = zth + 1
zt = rs("状态描述")
Nom = rs("数量")
Me.MSFlexGrid1.TextMatrix(i, 1) = zt
Me.MSFlexGrid1.TextMatrix(i, 2) = Nom
Me.MSFlexGrid1.TextMatrix(i, 3) = zth
i = i + 1
TotalRow = TotalRow + 1
Else
Me.MSFlexGrid1.TextMatrix(i - 1, 2) = Nom +rs("数量")

End If
rs.MoveNext

Loop
请问如何循环

Answer 1

sql=SELECT count(*) as 'zt' FROM 计划 WHERE 状态描述="你要统计的状态";
rs.open sql,cnn,3,1

Nom=rs.field(0).value

Me.MSFlexGrid1.TextMatrix(i, 1) = zt
Me.MSFlexGrid1.TextMatrix(i, 2) = Nom
Me.MSFlexGrid1.TextMatrix(i, 3) = zth
这是要你自己手动给定条件的,如果要自动,你可以用循环做.