同系列的第五篇，上一篇在：http://blog.csdn.net/jiluoxingren/article/details/9633139
数据的查找与筛选
第4篇发布到现在已经过了4天，很抱歉，学生党，还是悲催的高三，没办法，8月1就开学了。以后更新文章的速度可能会更慢，而且出完这套数据库教程之后，未来一年都可能不会有新的教程了。就我而言是想写下去，多写点的，一是记录下自己会的，另一方面把自己会的知识传播出去，不过高三这段时间可能力不从心了。
继续吧，看标题“包含表中局部数据的数据集，数据的查找”，看上去是两项内容，实际上是一项。查找，筛选，实际上都是为了获取我们需要的数据，而不是将所有数据都提取出来。在这一章，我们将再次体会到sql：Select语句的强大。
取得表中前n个或前n%的记录
之前，我说过sql：Select语句的一个简化的语法，这已经是第三章的内容了，还记得吗？复习一下：
SELECTfieldnamelist FROM tablename
要获得表中前n个或前n%个记录，尽管我们可以打开整张表的数据，然后在用循环显示数据的时候最大值为n，n为我们想要的条数这种方式来实现，但是sql：Select语句提供一个直接的方法来让我们获得表中前n个或前n%个记录。这时候我们要扩充sql：Select语句的语法了。我们来看新的语法：
SELECT TOP n [PERCENT]fieldnamelist FROM tablename
我们发现新的语法在fieldnamelist前面加入了TOP n [PERCENT]这一部分，TOP和PERCENT都是sql的关键字，所以我也按照我之前所说的习惯：sql语句的关键字用大写。需要先说[PERCENT]，[]这样的语法表示的是可选，也就是说TOP这样一个关键字加进去之后，n是必须的了，但是PERCENT依然是可选的，如果写上他，那n就代表前n%，是一个百分数，可取的范围是0<n<100；而如果没有PERCENT，那么n就代表前n条，可取的范围是0<n<4294967295，也就是说如果表中有10000000000（不用数了，比4294967295多一位数字）条记录（假设吧，Access一张表最多能有多少条记录真没查过，说不定最多只能有4294967295条，知道确切数字的告诉我一下，不过先假设他能储存不止4294967295条吧），那么你最多也只能选出前面4294967295条。
让我们来实践一下吧，假设我们要取出前30%的记录，那么我们可以这样写（还是在Student表，取出全部字段）
SELECT TOP 30 PERCENT * FROM Student
前面说到的[PERCENT]的[]代表的是可省略，其实[]仅仅是语法表达的需要，实际上写sql语句是不需要写上去的。就像我上面的sql语句一样。
说完语法，照例是要上VB代码的。不上代码的话大家可能会产生疑惑，sql的语法换了，那么这个sql语句又应该写在哪里？？别急，下面会回答你这个问题。
数据的条件查找
要实现数据的查找，就必须要使用更复杂语法的sql：Select语句。我们来看下面的语法：
SELECTfieldnamelist FROM tablenameWHERE 条件
会发现，这个语法比最初的语法多了一个“WHERE 条件”，但又没有了第一节的TOP n [PERCENT]这一部分，实际上除了最初给出来的语法内容是必须的，其他都是可以根据需要增添上去的。就是这个条件实现了数据的查找，也就是实现了把我们需要的数据从表里面取出来，而不是像之前那样取出一张表的全部数据。语法中“条件”两个字实际上很虚无，到底这个条件怎么写呢？最简单的是“ 字段名='内容'”，留意里面的一对单引号，当内容是中文的时候就需要用单引号引起来，如果不是的话与一般来说可以不用单引号。一定要注意这是单引号！
我们来写一个语句实践一下吧。假设我们要找出Student表中的StudentName为“黄飞鸿”的记录，我们可以这样写：
SELECT * FROMStudent WHERE StudentName='黄飞鸿'
前面 SELECT * FROMStudent 的部分之前已经说过，光是这样没有Where关键字就是选出全部的记录。WHERE StudentName='黄飞鸿'，就表示选出StudentName字段中内容为“黄飞鸿”的记录。
还是上面的实践中的例子，需要留意的是，认真看一下实践中我所写的sql语句，Select后面跟着的字段名列表是用*的，也就是全部字段都选出来。然后再看我sql语句后面的解释：“我们选出的是……的记录”，注意是记录，一个记录有多个字段的数据组成。所以，上面我写的语句的作用不仅仅是把StudentName字段中的“黄飞鸿”这个文本内容选了出来，同时还有StudentID字段中他所对应的的数据662356也被选了出来。这体现了数据库的对应关系。
现在来回答上一节的最后，提出的语法改变了，那么新的sql语句又要写在什么地方的问题。其实还是老地方，其实每调用一次sql：Select语句，无论是之前的简单语法，还是现在有Where的语法，甚至以后更复杂的语法，sql：Select语句的作用都是返回一个数据集（如果符合Where条件的记录找不到，那这个数据集就是空的）。所以，所有的sql：Select语句都可以作为参数传递给Recordset对象的Open方法。
照样，现在我们把实践中写的那个sql语句作为参数传递给Recordset对象的Open方法，并显示在表格里。这个还是写在Load事件里吧。这次我把Load事件里的代码全都列出来，包括之前的连接数据库的，还有打开整张表的代码，这样做是为了给大家一个提醒，具体提醒是什么？认真看看注释吧，代码后面还会说的。
VB代码开始：
Private Sub Form_Load()
'创建新的Connection对象
Set Cnn = NewADODB.Connection
Cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\Sample.mdb;Persist Security Info=False"
'创建新的Recordset对象
Set rec = New ADODB.Recordset
'打开student表的全部字段的全部内容
'adOpenKeyset,adLockOptimistic。键集游标和开放式锁。
'单纯为了读取数据应该使用只进游标和只读锁。
'但是为了方便就统一使用键集游标和开放式锁了
'详细参见第十章
rec.Open"SELECT * FROM Student",Cnn,
'---------------------------------------------------------------------
'“----”注释里的是第五章新加的代码
'---------------------------------------------------------------------
'注意了！！如果使用之前的Recordset对象变量rec
'而且之前的rec已经被Open过了，那么必须调用Close
rec.Close
'打开student表中StudentName为“黄飞鸿”的记录
rec.Open"SELECT * FROM Student Where StudentName='黄飞鸿'",
'---------------------------------------------------------------------
'---------------------------------------------------------------------
'数据的提取
Do Until rec.EOF =True
List1.AddItem rec.Fields("StudentID").Value
'Fields对象，括号里的是索引(Index)，索引填写的内容为字段的名称
'Item属性是Fields对象的默认属性，他的一个参数就是Index
'Fields("Student")表示一个Field对象
'Fields("Student")等价于
'rec.Fields.Item ("Student")或
'rec.Fields! ("Student")
'!表示默认属性
List2.AddItem rec.Fields("StudentName").Value
'移动下一条记录为当前记录
rec.MoveNext
Loop
End Sub
VB代码结束：
这里我们可以看到3行的红色注释（虽然VB的IDE里的注释是用绿色显示的，不过这里为了强调就用红色），非常显眼。这就是我要提醒大家的地方。实际的数据库应用里，往往需要将Recordset对象回收再用。例如这里我需要显示出全部的人名，待会我可能又根据用户的需要去找某个人的记录，或者待会可能还要排一下序。我们不可能创建那么多的Recordset对象，如果要的话就意味着我们需要声明很多个Recordset对象变量，这很可能会很混乱。所以Close之后重新用Open执行其他的操作，这样的手段是经常用到的。
我们可以看到，之前的打开整张表的代码我没有去掉，然后就是在一堆注释之后直接Close，再用Open来写今天的代码了。而后面的输出到List控件的代码也被保留了下来，接在了今天新的代码之后。所以现在的输出List1里就只有662356，List2就只有”黄飞鸿“了。
当前的代码运行结果如下图：
@H_856_404@ @H_856_404@最后，给大家留个作业吧。第一节“取得表中前n个或前n%的记录”的sql语句我一直没写用在VB上的代码，既然都知道了还是作为参数传递给Recordset对象的Open方法，那么自己去试一下吧。以为WHERE关键字的作用就怎么点？？还没完呢！下一章，我们将来讲述：多重条件搜索。本套教程未完，待续。
@H_856_404@
第六章：续篇序 和 给学习者的话http://blog.csdn.net/jiluoxingren/article/details/48402835
原文链接：https://www.f2er.com/vb/258661.html