VB中使用SQ语言基本教程.docVIP

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使用的就是 % 和 _ 作为查询通配符。另外Microsoft Jet Engine对于LIKE操作符还提供了其它一些的过滤选项，具体的内容可参见MSDN索引中的 Like Operator 条目。 IN 操作符用于比较某一个值是否等于几个值中的一个值，例如下面的语句： SELECT [Title],[Year Published] FROM [Titles]