《示例》专题

Var、VarP 函数示例 此示例使用订单表估计对于送货至英国订单货运成本的方差。 此示例调用过程 EnumFields 过程，且可以在 SELECT 语句示例中找到该过程。 Sub VarX() Dim dbs As Database, rst As Recordset ' 在您的计算机中修改此行使其正确指到 Northwind 的路径。 Set dbs = OpenDatabase("Nort

StDev、StDevP 函数示例 此示例使用订单表对送货至英国的订单估计货运运费的标准偏差。 此示例调用过程 EnumFields 过程，且可以在 SELECT 语句示例中找到该过程。 Sub StDevX() Dim dbs As Database, rst As Recordset ' 在您的计算机中修改此行使其正确指到 Northwind 的路径。 Set dbs = OpenDataba

SELECT...INTO 语句示例 此示例选择在员工表中的所有记录，然后复制到命名为 Emp Backup 的新表中。 Sub SelectIntoX() Dim dbs As Database Dim qdf As QueryDef ' 在您的计算机中修改此行使其正确指到 Northwind 的路径。 Set dbs = OpenDatabase("Northwind.mdb") ' 对运费超

ORDER BY 子句示例 在下列示例中显示的 SQL 语句使用 ORDER BY 子句来排列记录，以订单中的姓氏 (Z-A) 做递减排列。 此示例调用过程 EnumFields 过程，且可以在 SELECT 语句示例中找到该过程。 Sub OrderByX() Dim dbs As Database, rst As Recordset ' 在您的计算机中修改此行使其正确指到 Northwind

Min、Max 函数示例 此示例使用订单表对送货至英国的订单返回最低的和最高的货运运费。 此示例调用过程 EnumFields 过程，且可以在 SELECT 语句示例中找到该过程。 Sub MinMaxX() Dim dbs As Database, rst As Recordset ' 在您的计算机中修改此行使其正确指到 Northwind 的路径。 Set dbs = OpenDatabase

Like 运算符示例 此示例返回员工名字以字母 A 到 D 开始的员工列表。 此示例调用过程 EnumFields 过程，且可以在 SELECT 语句示例中找到该过程。 Sub LikeX() Dim dbs As Database, rst As Recordset ' 在您的计算机中修改此行使其正确指到 Northwind 的路径。 Set dbs = OpenDatabase("Northw

INSERT INTO 语句示例 此示例选择在一假设的新客户表中的所有记录，并且增加它们至客户表中。当个别的栏没有设计时，此 SELECT 表的列名必须完全地符合那些在 INSERT INTO 表中的列名。 Sub InsertIntoX1() Dim dbs As Database ' 在您的计算机中修改此行使其正确指到 Northwind 的路径。 Set dbs = OpenDatabase

In 运算符示例 下列示例使用在 Northwind.mdb 数据库的订单表创建查询，且该查询包含所有送货到 Lancashire 和 Essex 的数据及送货日期。 此示例调用过程 EnumFields 过程，且可以在 SELECT 语句示例中找到该过程。 Sub InX() Dim dbs As Database, rst As Recordset ' 在您的计算机中修改此行使其正确指到 No

INNER JOIN 运算示例 此示例创建了两个对等联接:一个是在订货明细表和订单表之间，另一个是在订单表和员工表之间。这是必需的，因为员工表不含业务人员数据，并且订货明细表不含员工数据。查询生成员工和他们的业绩列表。 此示例调用过程 EnumFields 过程，且可以在 SELECT 语句示例中找到该过程。 Sub InnerJoinX() Dim dbs As Database, rst As

GROUP BY 子句示例 此示例创建一列表，列出唯一的工作职称及每种职称的员工人数。 此示例调用过程 EnumFields 过程，且可以在 SELECT 语句示例中找到该过程。 Sub GroupByX1() Dim dbs As Database, rst As Recordset ' 在您的计算机中修改此行使其正确指到 Northwind 的路径。 Set dbs = OpenDatabas

CREATE INDEX 语句示例 此示例在员工表中创建家用电话字段的索引并且扩展员工表。 Sub CreateIndexX1() Dim dbs As Database ' 在您的计算机中修改此行使其正确指到 Northwind 的路径。 Set dbs = OpenDatabase("Northwind.mdb") ' 对运费超过 $100 的订单， '在员工表中创建 NewIndex 索引。

SQL 子查询示例 此示例列出每一客户的名称和 1995 第二季订单的联络人。 此示例调用过程 EnumFields 过程，且可以在 SELECT 语句示例中找到该过程。 Sub SubQueryX() Dim dbs As Database, rst As Recordset ' 在您的计算机中修改此行使其正确指到 Northwind 的路径。 Set dbs = OpenDatabase("N

ALTER TABLE 语句示例 此示例在员工表中增加 Money 数据类型的一个工资字段。 Sub AlterTableX1() Dim dbs As Database ' 在您的计算机中修改此行使其正确指到 Northwind 的路径。 Set dbs = OpenDatabase("Northwind.mdb") ' 对运费超过 $100 的订单， '添加工资字段至员工表中， '并且设置为

First、 Last 函数示例 此示例使用员工表返回第一笔和最后一笔记录之姓氏字段的值。 此示例调用过程 EnumFields 过程，且可以在 SELECT 语句示例中找到该过程。 Sub FirstLastX1() Dim dbs As Database, rst As Recordset ' 在您的计算机中修改此行使其正确指到 Northwind 的路径。 Set dbs = OpenDat

附录 D. 示例清单 第 1 章 安装 Python 1.3. Mac OS X 上的 Python 例 1.1. 两个 Python 版本 1.5. RedHat Linux 上的 Python 例 1.2. 在 RedHat Linux 9 上安装 1.6. Debian GNU/Linux 上的 Python 例 1.3. 在 Debian GNU/Linux 上安装 1.7. 从源代码安装