很简单的问题，麻烦大家了！

xuchunyang　发表于：2010-10-12 17:22:33 　

复制

大家好，

我想在文本框中统计一下表中有多少个省，怎么写代码？

谢谢大家！

点击下载此附件

Top

王樵民发表于：2010-10-12 17:49:44

创建一个查询为查询1，然后设置文本框的空间来源属性=DCount("*","查询1")

点击下载此附件

Top

kkk 发表于：2010-10-12 17:58:32

Private Sub Form_Open(Cancel As Integer)

Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
rs.Open "select distinct 省份 from 表1", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
Me.Text0.Value = rs.RecordCount

End Sub

"select distinct" 用于返回不相同的值

Top

xuchunyang 发表于：2010-10-12 22:39:56

谢谢两位的帮助，问题解决了！

由于王樵民　已经贵为版主，所以我把最佳答案给KKK！

再次感谢二位！

Top

总记录：3篇页次：1/1 9 1 :

Access交流中心

很简单的问题，麻烦大家了！