VB中使用SQL語言基本教程.docVIP

PAGE PAGE 12 VB中使用SQL语言基本教程 2008-04-03 16:06 SQL语言基本教程（一）??? 数据库查询语言（SQL）是使用于关系数据库的标准语言，被很多类型的数据库所支持。本文将以VB加DAO为例，来介绍基本的SQL语法以及使用。本章将介绍的是SQL语言中的基本查询语句，并带有范例。??? 要更好的阅读本文，读者需要对数据库的基本结构以及术语有一个基本的了解，而且最好能有一定的VB数据库编程经验。除非特别说明，本文将使用的数据库是VB中附带的BIBLIO.MDB数据库。 一、SELECT...FROM...WHERE语句??? 语句的语法如下：SELECT [all | * | distinct column1, column2]FROM table1[, table2]WHERE [condition1 | expression1] [AND condition2 | rxpression2]??? 在上面的语法中，[]外的语句是必须的，而[]内的是可选的，对于以 | 分割的操作符，则表明语法中必须从| 分割的操作符中选择一个。下面的语法描述同上。??? 在SELECT...FROM...WHERE语句中其中SELECT指定需要检索的字段，FROM指定要查询的表，WHERE指定选择纪录的条件，另外还可以包含ORDER BY语句来制定排序纪录。语法如下：ORDER BY column1 | Integer [ASC | DESC]??? 其中column1制定排序的字段，也可以使用Integer指定的字段索引来排序，ASC为升序、DESC为降序。 范例一：找到Titles表中所有出版日期在1990年以后以及包含文字Beginner的书名建立一个新工程，加入DAO定义库（点击菜单中的 Project | References项，在列表中选择Microsoft DAO 3.51 Object Library（也可以是更高版本的3.60，如果安装了的话），然后在Form中加入一个ListBox控件。在Form1的代码窗口中加入以下代码：Private Sub Form_Load()??? Dim rsTemp As Recordset??? Dim dbTemp As Database??? Dim astr As String??? ??? Set dbTemp = DBEngine(0).OpenDatabase(e:\program files\microsoft visual studio\vb98\biblio.mdb, _dbOpenSnapshot)??? astr = SELECT [Title] FROM [Titles] WHERE [Year Published] 1990 _??????????? AND Title LIKE *Beginner* ORDER BY Title DESC??? Set rsTemp = dbTemp.OpenRecordset(astr)??? If rsTemp.RecordCount 0 Then??????? rsTemp.MoveFirst??????? Do Until rsTemp.EOF??????????? List1.AddItem rsTemp![Title]??????????? rsTemp.MoveNext??????? Loop??? End IfEnd Sub??? 运行程序，List1中就会列出所有出版日期在1990年以后以及包含文字Beginner的书的书名并将书名按照降序进行排列。??? 在上面的SELECT语句的WHERE中，我们使用了操作符号 来比较大小以及使用LIKE进行匹配。在WHERE语句中，可以使用的操作符有以下几类：1、比较操作符??? 包含 =、、、、=、= 等若干类2、逻辑操作符??? 包含以下若干类：??? LIKE、IN、BETWEEN、UNIQUE、IS NULL、EXISTS、ALL和ANY??? LIKE 操作符通过使用通配符将一个值同其它值比较，在VB的SQL查询中，可以使用的通配符是 * 和 ? 其中 * 代表任意的若干个字符，而 ? 代表一个字符，例如上面语句中的LIKE *Beginner* 代表查找所有包含字符串Beginner的值。不过要注意的是使用 * 和 ? 作为通配符是VB的专利。真正的SQL语言的通配符是 % 和 _ ，其中 % 代表任意多个字符，_ 代表一个字符例如VB中的Data Environment使用的就是 % 和 _ 作为查询通配符。另外Micr