对于初学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的区别,大体是一样的。