关于更改查询条件的请教

princezjp

关于更改查询条件的请教
现在有一个表单，内容如下：

序号        内容1         内容2          内容3
  1            a1             a2              a3
  2            b1             b2              b3
  3            c1             c2               c3
  4            d1             d2              d3
  5            e1             e2              e3
  6            f1              f2               f3
现在想创建了一个查询，根据不同的条件来显示查询结果，
比如：按钮一按下，显示条件为序号小于2的记录
        按钮二按下，显示条件为序号大于2小于5的记录        
        按钮三按下，显示条件为序号小于5的记录
也就是说，显示条件由不同的按钮进行设置，有没有什么好的处理方式，
能否通过设定source条件完成，如果能完成，请给个示范的语句，谢谢！！

Henry D. Sy

把例子传上来

princezjp

Private Sub Command0_Click()
Dim i As Integer
Dim stemp As String
Dim Rs As ADODB.Recordset
Set Rs = New ADODB.Recordset
stemp = "Select * From 查询"
Rs.Open stemp, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
Rs.Source = "SELECT 表.序号, 表.内容1, 表.内容2, 表.内容3 FROM 表 WHERE (((表.序号)<2))"
End Sub

这样不行，该如何更改，谢谢

lanydesign

不知道能否回复，试试

lanydesign

建立三个查询，三个按钮分别指向该查询

lanydesign

做了个例子，你看看