序号 内容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 时间: 2009-8-11 11:04
把例子传上来作者: princezjp 时间: 2009-8-11 11:52
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