如何在Visual Studio 2022中结合Access数据库使用参数实现动态过滤

a) 在Fill/GetData中使用参数并在Query Builder中配置的实现方法 #

完全可行，分两种常见场景实现：

场景1：Access原生表单+查询设计器 #

1. 打开Query Builder，编写查询时将WHERE子句设置为带参数的形式：

   SELECT * FROM 你的表名 WHERE Country = [CountryName]
   

2. 保存该查询，将表单的RecordSource绑定到这个查询。
3. 若要通过代码动态传递参数而非依赖Access的输入对话框，可使用VBA修改查询参数：

   Dim qdf As QueryDef
   Set qdf = CurrentDb.QueryDefs("你的查询名称")
   qdf.Parameters("CountryName") = "UK" ' 替换为动态变量
   Me.RecordSource = qdf.Name
   Set qdf = Nothing
   

场景2：.NET环境+TableAdapter #

1. 在配置TableAdapter的Fill方法时，在Query Builder中使用参数化SQL：

   SELECT * FROM 你的表名 WHERE Country = @CountryName
   

2. 代码中调用Fill时直接传递参数：

   // C#示例
   yourTableAdapter.Fill(yourDataSet.YourTableName, "UK");
   

   ' VB.NET示例
   yourTableAdapter.Fill(yourDataSet.YourTableName, "UK")
   

b) 通过代码修改Fill查询的CommandText属性 #

可以实现，同样分场景说明：

场景1：Access VBA环境 #

• 直接修改表单的RecordSource为动态SQL：

  Dim targetCountry As String
  targetCountry = "UK"
  ' 注意转义单引号避免SQL注入
  targetCountry = Replace(targetCountry, "'", "''")
  Me.RecordSource = "SELECT * FROM 你的表名 WHERE Country = '" & targetCountry & "'"
  

• 若使用预定义查询，可修改QueryDef的SQL属性：

  Dim qdf As QueryDef
  Set qdf = CurrentDb.QueryDefs("你的查询名称")
  qdf.SQL = "SELECT * FROM 你的表名 WHERE Country = '" & targetCountry & "'"
  Me.RecordSource = qdf.Name
  Set qdf = Nothing
  

场景2：.NET环境+TableAdapter #

直接修改TableAdapter的SelectCommand属性：

// C#示例
yourTableAdapter.SelectCommand.CommandText = "SELECT * FROM 你的表名 WHERE Country = @CountryName";
yourTableAdapter.SelectCommand.Parameters.Clear();
yourTableAdapter.SelectCommand.Parameters.AddWithValue("@CountryName", "UK");
yourTableAdapter.Fill(yourDataSet.YourTableName);

' VB.NET示例
yourTableAdapter.SelectCommand.CommandText = "SELECT * FROM 你的表名 WHERE Country = @CountryName"
yourTableAdapter.SelectCommand.Parameters.Clear()
yourTableAdapter.SelectCommand.Parameters.AddWithValue("@CountryName", "UK")
yourTableAdapter.Fill(yourDataSet.YourTableName)

内容的提问来源于stack exchange，提问作者Carl Harbinson