一个月的数据库实训就转眼间就上完了，期间讲解了一个学生管理系统，最后还做了一个小的数据库链接作业。现在就说说关于vb链接的数据库的一些方法。

首先说数据库，简单的说就是建表格,然后把一张一张的表格和在一起,成为一大堆的数据集合。他是依照某种数据结构组织起来并存放二级存储器中的数据集合，基本分为三个层次，物理数据层，概念数据层和逻辑数据层。不同层次间的联系是通过映射来转换的。

大多数vb链接数据库都使用ado控件，他可以分为分为有源数据库和无源数据库，即是否使用了dsn数据源。在连接数据库前首先要在vb菜单中工程-引用或部件从中选择 microsoft activex data objects 2.6 lipary和 microsoft activex data objects recordset 2.6两个组件，然后定义链接的对象，用什么名字由自己决定。下面的代码也要由自己建立的数据库来具体设置参数。

set db = new adodb.connection

set xs = new adodb.recordset

conn.connectionstring = "dsn=login;uid=;pwd=;"

conn.connectiontimeout = 30

conn.open

rs.open "select 用户名 from login", conn, adopenstatic, adlockreadonly, adcmdtext

dim i as string

for t = 0 to val(rs.recordcount) - 1

i = trim(rs.fields("用户名").value)

rs.movenext

combo1.additem i

next t

rs.close

这样数据库也就基本上链接好了。