select sum(字段) from tablename
解决方案 »
- 浏览器的问题
- 实时错误'9' 下标越界 问题
- 在reeView控件中,删除父节点的同时,如何删除所有子节点?
- 自己做的控件如何更改其在控件栏里显示的的图标
- 有什么办法让mshflexgrid根据显示的数据内容自动调整大小吗?
- 求关于treeview的一段代码,在线,解决马上给分
- 一个十分棘手的问题,关于打开文件!高手请进!!
- 怎么打开目录下的txt文件并用正则提取内容
- 请大家看看这个问题
- 调用中文输入法,程序如何实现
- 在VC版问了没人理我,回家再问问。有关WH_CALLWNDPROCRET钩子返回的lParam指针
- VB中引用CHARTFX控件时出错,chartfx1.opendata(cod_values,2,3)
此示例调用 EnumFields 过程,且可以在 SELECT 语句示例中找到该过程。Sub SumX() Dim dbs As Database, rst As Recordset ' 在您的计算机中修改此行使其正确指到 Northwind 的路径。
Set dbs = OpenDatabase("Northwind.mdb") ' 计算送货至英国订单的合计销售额。
Set rst = dbs.OpenRecordset("SELECT" _
& " Sum(UnitPrice*Quantity)" _
& " AS [Total UK Sales] FROM Orders" _
& " INNER JOIN [Order Details] ON" _
& " Orders.OrderID = [Order Details].OrderID" _
& " WHERE (ShipCountry = '英国');")'移居记录集。
rst.MoveLast ' 调用 EnumFields 来打印记录集记录集的内容,
' 通过 Recordset 对象和需要的字段宽度。
EnumFields rst, 15
dbs.CloseEnd Sub
MsgBox aaa
仍在用DAO吗?
我什么都用.