EXECUTE 语句 (Microsoft Access SQL)

适用于：Access 2013、Office 2013

用于启动过程的执行。

语法

EXECUTE procedure [param1[, param2[, …]]

EXECUTE 语句包含以下部分：

Part

说明

procedure

要执行的过程的名称。

param1, param2, …

过程定义的参数的值。

示例

本示例将查询命名为 CategoryList，并调用 EnumFields 过程，您可以在 SELECT 语句示例中找到该过程。

Sub ProcedureX()

Dim dbs As Database, rst As Recordset

Dim qdf As QueryDef, strSql As String

' Modify this line to include the path to Northwind

' on your computer.

Set dbs = OpenDatabase("Northwind.mdb")

strSql = "PROCEDURE CategoryList; " _

& "SELECT DISTINCTROW CategoryName, " _

& "CategoryID FROM Categories " _

& "ORDER BY CategoryName;"

' Create a named QueryDef based on the SQL

' statement.

Set qdf = dbs.CreateQueryDef("NewQry", strSql)

' Create a temporary snapshot-type Recordset.

Set rst = qdf.OpenRecordset(dbOpenSnapshot)

' Populate the Recordset.

rst.MoveLast

' Call EnumFields to print the contents of the

' Recordset. Pass the Recordset object and desired

' field width.

Execute EnumFields rst, 15

' Delete the QueryDef because this is a

' demonstration.

dbs.QueryDefs.Delete "NewQry"

dbs.Close

End Sub