VB添加、删除或修改数据（实例）

*****SQL基本语句*****

*********SELECT查询**********

SELECT[all/distinct] * |<字段列表>

[TOP 返回记录条数]

FROM<表名，可多个表>

[WHERE<条件表达式>]

[ORDER BY<列名>[ASC/DESC]]

All:表示检索所有符合条件的元素，默认值为alldistinct:表示检索要去掉重复的所有元素。

SELECT * from info'从info表中查询所有字段数据

SELECT number,name from info '从info表中查询number,name两个字段的数据

SELECT * from info where d_100<90 and d_400>80 '从info表中查询所有d_100<90且d_400>80的所有字段

SELECT * from info where name like '杜*' '从info表中查询name字段中第一个字为杜的所有字段

SELECT top 2 * from info '从info表中查询顶部两条记录的所有字段

SELECT * from info order by d_100 desc '从info表中查询所有字段并按d_100字段的降序排序

'order by排序也可多个排序，用豆号分开即可

**********多表联合查询**********

select * from user,info where user.u_id=info.i_uid

'从user,info两个表中查询user表中的u_id字段与

'info表中的i_uid字段值相同的所有字段

select * from user,info where user.u_id=info.i_uid and user.u_user="zzz"

'从user,info两个表中查询user表中的u_id字段与

'info表中的i_uid字段值相同并且user表中的u_user

'字段的值为zzz的所有字段

select u_user,i_name,i_sex,i_age form use,info where u_id=i_id and i_vip=true

'从user,info两个表中查询user表中的u_id字段与

'info表中的i_uid字段值相同并且vip为真的部份字段

'只要两字字段名不相同，就可省掉表名

*********INSERT INTO增加、插入**********

INSERT INTO表名

[(字段1[,字段2[……]])]

VALUES

(字段1[,字段2[……]])

insert into user(u_user,u_code) values ('fif','test')

'向user表中的两个字段分别插入两个值

insert into info valuse(7,'fif','test') '向user表中依次插入所有值，顺序不能变

*********UPDATE修改，更新**********

UPDATE 表名

SET 字段名1=表达式1[,字段名2=表达式2……]

[WHERE 条件表达式]

update info set i_age=i_age+1 '修改info表中的i_age字段，所有字段全部加1

update info set i_age=20,i_vip=fales where i_vip=true

'修改info表中的i_age字段和i_vip字段，当i_vip=true时

*********DELETE删除**********

DELETE FROM 表名

[WHERE 条件表达式]

delete from info where i_age=20 '删除info表中所有i_age=20的一行

只能告诉你这些方法。其它自己想想吧。

使用ADO，首先用ADOConnection对象建立连接，然后使用ADOQuery对象对数据库进行 *** 作。

ADOQuery对象 *** 作：

查询：先使用close；再设置SQL.text为SQL查询语句内容；最后使用OPEN方法打开

添加：Append或Insert；FieldByName（'字段名'）.Value

:=

字段内容；Post；

修改：Edit；FieldByName（'字段名'）.Value

:=

字段内容；Post；

删除：定位到指定记录（使用循环）；Delete；

---