对于初学vb的同学们来说,数据库是一个很让人头疼的东西,我就曾经因为对数据库一点认识都没有而感到头疼万分、、、

     昨天,在我研究一个有关数据库的软件一周以后,终于对数据库有了一点点的认知。

    首先,为什么要学数据库,数据库是干嘛的?数据库为什么这么令人头疼?

数据库可以说是学习软件开发的核心课程之一,几乎绝大部分软件都涉及到数据库,很多数据必须存在数据库中,最初都是存在文件中,但是,随着数据量的增大,文件已经不能很理想的去处理这些数据,这就是数据库诞生的原因,也是我们学习数据库的原因。

其实数据库不难学,只是我们之前没有接触过,所以才感觉数据库不好弄,学数据库开始要了解数据库的SQL语句,会很熟练的使用这些语句实现复杂的查询,插入,删除等等。

下面就我学的vb中的数据库谈一下我对数据库的一些最简单的认识——数据库,就是一个存放很多东西的一个软件。在vb中,通过  外界程序—可视化数据管理 进入关联数据库的界面

点击可视化数据管理后进入如下界面


选中文件后,可以打开或者新建数据库


         首先,要给你建立的数据库起一个名称,如 mydb,数据库命名后,数据库就建好了。然后, 在properties处,单击鼠标右键,选择新建表,弹出如下界面:

                        在然后,单击“添加字段”往你的表中加入字段,比如说发:姓名,年龄,爱好等等。

           

单击生成表


这时你的数据库就建立成功了。

建立成功后的下一步就是让vb与数据库关联。然后,往表中加入数据,和从表中读取数据。

             首先,工程中添加一个引用


进入后加入以下部件


和一个部件(输出用的,不太重要)


Dim conn As ADODB.Connection ‘定义数据库

 Dim rs As ADODB.Recordset      ‘定义数据的物理内存

Private Sub command1_click()

 Dim strsql As String

Set conn = New ADODB.Connection ‘实例化地址

 conn.Open"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\销售管理系统\库\产品信息.mdb(数据库路径)

Persist Security Info=False"

strsql = "select * from 产品信息表"    ‘sql语句在这里写

Set rs = New ADODB.Recordset         ‘实例化数据库

 rs.CursorLocation =adUseClient

rs.Open strsql, conn, adOpenDynamic, adLockReadOnly

Set DataGrid1.DataSource = rs

End Sub

这些代码可以实现从数据库中调出,其他功能只是sql的区别,大体是一样的。

posted on 2014-03-31 16:59  精品唯居  阅读(174)  评论(0编辑  收藏  举报