SetParam 方法 - Microsoft Excel Visual Basic 2002 参考

返回介绍

SetParam 方法

发布于 2019-08-07 字数 1551 浏览 889 评论 0

定义指定查询表的参数。


expression.SetParam(Type, Value)


expression 必需。该表达式返回“应用于”列表中的一个对象。

Type XlParameterType 类型,必需。





XlParameterType 可为以下 XlParameterType 常量之一。
xlConstant 使用 Value 参数指定的值。
xlPrompt 显示提示用户输入值的对话框。Value 参数指定的是对话框中显示的文字。
xlRange 使用区域左上角单元格的值。Value 参数指定的是一个 Range 对象。

Value Variant 类型,必需。指定参数的值,如 Type 参数的说明所示。

示例

本示例更改第一张查询表的 SQL 语句。语句“(city=?)”表明此查询为参数查询,本示例将城市常量值设置为“Oakland”。

Set qt = Sheets("sheet1").QueryTables(1)
qt.Sql = "SELECT * FROM authors  WHERE (city=?)"
Set param1 = qt.Parameters.Add("City Parameter", _
    xlParamTypeVarChar)
param1.SetParam xlConstant, "Oakland"
qt.Refresh

本示例将 city 的值设为第二张工作表中 A2 单元格的值。

Set qt = Sheets("sheet1").QueryTables(1)
qt.Sql = "SELECT * FROM authors  WHERE (city=?)"
Set param1 = qt.Parameters.Add("City Parameter", _
    xlParamTypeVarChar)
param1.SetParam xlRange, Range("sheet2!a1")
qt.Refresh

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

目前还没有任何评论,快来抢沙发吧!