哪个高手能告诉我什么是VB数据库啊，

在"工程'引用'"中选择 Microsoft ActiveX data Objects 2.6 Library
Dim conn As New ADODB.Connection '连接对象
Dim rs As New ADODB.Recordset '记录集对象

Private Sub Command1_Click()
'插入数据：
If rs.State <> adStateClosed Then '检查记录集状态
rs.Close
End If
rs.Open "insert into T_user(name,age) values('" & txtname.Text & "'," & txtage & ")", conn, adOpenDynamic, adLockBatchOptimistic
If rs.State <> adStateClosed Then
rs.Close
End If
'更新DataGrid1数据
rs.Open "select * from T_user", conn, adOpenDynamic, adLockBatchOptimistic
Set DataGrid1.DataSource = rs
End Sub

Private Sub Form_Load()
dim StrSqL as string
（'此为连接字符串，可新建一个.txt文档将其后缀名改为.udl在“提供程序“中选择 Microsoft OLE DB provider for SQL server.
conn.Open StrSqL
"下一步"后选择服务器、登陆方式和数据库。
再选择记事本方式打开复制类似如下代码：
Provider=SQLOLEDB.1;I