Office中国论坛/Access中国论坛

标题: UNION 运算---新手必看 [打印本页]

作者: ququ 时间: 2004-9-17 03:47
标题: UNION 运算---新手必看

UNION 运算

创建一个联合查询，它组合了两个或更多的独立查询或表的结果。

语法

[TABLE] query1 UNION [ALL] [TABLE] query2 [UNION [ALL] [TABLE] queryn [ ... ]]

UNION 运算可分为以下几个部分：

部分说明

query1-n SELECT 语句、已存储的查询的名称、或冠以 TABLE 关键字的存储表的名称。

说明

可以在任何组合中、单一 UNION 运算中，合并两个或多个查询、表、及 SELECT 语句的结果。下列示例将名为 New Accounts 的现存表和一个 SELECT 语句合并：

TABLE [New Accounts] UNION ALL

SELECT *

FROM Customers

WHERE OrderAmount > 1000;

按照缺省规定，使用 UNION 运算时不返回重复的记录；然而，可以包含 ALL 谓词来确保返回所有的记录。这样，运行查询的速度也会快些。

一次 UNION 运算中的所有查询必须要求相同的字段数量；但是，字段无须具有相同的大小或数据类型。

只能在第一个 SELECT 语句中使用别名，因为它们在其他语句中已被省略。在 ORDER BY 子句中，可引用在第一个 SELECT 语句中被调用的字段名。

--------------------------------------------------------------------------------

注意

可以在各个查询变元中使用GROUP BY或 HAVING 子句来为返回的数据分组。

要想以指定的顺序来显示返回的数据，可以在最后一个 query 参数的末尾使用 ORDER BY 子句。

--------------------------------------------------------------------------------

UNION 运算示例

此示例捕获在巴西的所有供给商和客户的名字及城市。

此示例调用过程 EnumFields 过程，且可以在 SELECT 语句示例中找到该过程。

Sub UnionX()

Dim dbs As Database, rst As Recordset

' 在您的计算机中修改此行使其正确指到 Northwind 的路径。

Set dbs = OpenDatabase("Northwind.mdb")

' 对运费超过 $100 的订单，

' 捕获在巴西的所有供给商和客户的名字及城市。

'

Set rst = dbs.OpenRecordset("SELECT CompanyName," _

      & " City FROM Suppliers" _

      & " WHERE Country = 'Brazil' UNION" _

      & " SELECT CompanyName, City FROM Customers" _

      & " WHERE Country = 'Brazil';")

' populateRecordset。

rst.MoveLast

' 调用 EnumFields 来打印记录集的内容。

'传递记录集对象和要求的字符宽度。

'

EnumFields rst, 12

dbs.Close

End Sub

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)