怎样vb 用sql 语句操控access？

新建工程后，先添加引用，一般用 Microsft ActiveX Data Object 2.6 Library
ADO的版本很多，选一个就行。
然后定义
dim rs as recordset
dim conn as new adodb.connection
再连接数据库
datafile = "d:\data.mdb"
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & datafile
conn.open

再使用sql语句就行
比如：
sql="select * from 表1"
rs.open sql,conn,1,3
就是查询 表1 的所有记录，然后可以添加进行具体的操作。

增加字段
alter table 表名 add 新字段名 char(200)
删除字段
ALTER TABLE table_NAME DROP COLUMN column_NAME
修改字段类型
ALTER TABLE table_name ALTER COLUMN column_name new_data_type

其他一些常用的sql语句：
选择：select * from table1 where 范围
插入：insert into table1(field1,field2) values(value1,value2)
删除：delete from table1 where 范围
更新：update table1 set field1=value1 where 范围
查找：select * from table1 where field1 like ’%value1%’
排序：select * from table1 order by field1,field2 [desc]
总数：select count as totalcount from table1
求和：select sum(field1) as sumvalue from table1
平均：select avg(field1) as avgvalue from table1
最大：select max(field1) as maxvalue from table1
最小：select min(field1) as minvalue from table1