2013-09-23
展开全部
首先需要确定要建立数据库的类型。在Visual Basic中通过数据访问控件或数据访问对象(DAO)可以访问下列数据库:
1. JET数据库,即Microsoft Access
2. ISAM数据库,如:dBase,FoxPro等
3. ODBC数据库,凡是遵循ODBC标准的客户/服务器数据库。如:Microsoft SQL Server、Oracle
一般来说,如果要开发个人的小型数据库系统,用Access数据库比较合适,要开发大、中型的数据库系统用ODBC数据库更为适宜。而dBase和FoxPro数据库由于已经过时,除非特别的情况,否则不要使用。在我们的例子中,当然选用Access数据库了。建立Access数据库有两种方法:一是在Microsoft Access中建立数据库。点击“新建”按钮就可以建立新的表了(如图1)。这里我们主要介绍第二种方法:使用可视化数据管理器,不需要编程就可创建数据库。可视化数据管理器是一个非常有用的应用程序,它是VB企业版和专业版附带的,在目录..DevStudiovbsamplesVisdata下,其界面如下图。
点击菜单“文件”项下“新建”子项“Microsoft ACCESS”子项的“版本7.0 MDB”项。在弹出窗口中输入新建数据库的名称“登记”,出现下面图3所示窗口:
要生成新的表,右键单击数据库窗口弹出菜单,然后选择“新表”命令,在随后出现的“表结构”对话框中建立所要的字段。每次向表中加入新的字段,单击“增加字段”按钮,会出现图4 的“增加字段”对话框。
“增加字段”对话框中的选项如表10所示,根据字段的类型,有些选项是无效的,无法读取。
在我们建立的登记数据库中,各个字段的类型如表11。
要注意的是,由于字段登记号用来唯一标志记录的,因此,它不能由用户输入。所以在定义该字段时需要定义为Long数据类型,“自动生成字段”项有效,并选中这一项。这样当用户每输入一条新记录时,系统就会在该字段上自动输入一个与其它记录不同的值。
1. JET数据库,即Microsoft Access
2. ISAM数据库,如:dBase,FoxPro等
3. ODBC数据库,凡是遵循ODBC标准的客户/服务器数据库。如:Microsoft SQL Server、Oracle
一般来说,如果要开发个人的小型数据库系统,用Access数据库比较合适,要开发大、中型的数据库系统用ODBC数据库更为适宜。而dBase和FoxPro数据库由于已经过时,除非特别的情况,否则不要使用。在我们的例子中,当然选用Access数据库了。建立Access数据库有两种方法:一是在Microsoft Access中建立数据库。点击“新建”按钮就可以建立新的表了(如图1)。这里我们主要介绍第二种方法:使用可视化数据管理器,不需要编程就可创建数据库。可视化数据管理器是一个非常有用的应用程序,它是VB企业版和专业版附带的,在目录..DevStudiovbsamplesVisdata下,其界面如下图。
点击菜单“文件”项下“新建”子项“Microsoft ACCESS”子项的“版本7.0 MDB”项。在弹出窗口中输入新建数据库的名称“登记”,出现下面图3所示窗口:
要生成新的表,右键单击数据库窗口弹出菜单,然后选择“新表”命令,在随后出现的“表结构”对话框中建立所要的字段。每次向表中加入新的字段,单击“增加字段”按钮,会出现图4 的“增加字段”对话框。
“增加字段”对话框中的选项如表10所示,根据字段的类型,有些选项是无效的,无法读取。
在我们建立的登记数据库中,各个字段的类型如表11。
要注意的是,由于字段登记号用来唯一标志记录的,因此,它不能由用户输入。所以在定义该字段时需要定义为Long数据类型,“自动生成字段”项有效,并选中这一项。这样当用户每输入一条新记录时,系统就会在该字段上自动输入一个与其它记录不同的值。
2013-09-23
展开全部
1.工程--引用:Microsoft ActiveX Data Objects 2.0 Library(其他版本也行)
2.定义Connection和Recordset对象
Public Con As Connection
Public rs As Recordset '数据集对象,一般用来存储查询结果
Public Sub SQLConnect() '数据库连接
Set Con = New Connection
Con.ConnectionString = conStr '数据库连接字符串,具体根据数据库而言
Con.Open
End Sub
3.数据库操作
Call SQLConnect 打开数据库连接
Con.Execute (sqlstr) '执行数据库操作语句
如果是插入数据,则sqlstr语句为:insert into table values('aa','bb','cc')
删除:delete from table where aa='bb'
修改:update table set cc='dd' where aa='bb'
2.定义Connection和Recordset对象
Public Con As Connection
Public rs As Recordset '数据集对象,一般用来存储查询结果
Public Sub SQLConnect() '数据库连接
Set Con = New Connection
Con.ConnectionString = conStr '数据库连接字符串,具体根据数据库而言
Con.Open
End Sub
3.数据库操作
Call SQLConnect 打开数据库连接
Con.Execute (sqlstr) '执行数据库操作语句
如果是插入数据,则sqlstr语句为:insert into table values('aa','bb','cc')
删除:delete from table where aa='bb'
修改:update table set cc='dd' where aa='bb'
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-09-23
展开全部
比如里面一张表test,有3个字段a,b,c,内容如下:
序号 a b c
1 1 2 3
2 4 5 6
3 7 8 9
1.修改a=1的记录b的值为10:db.Execute("update test set b=10 where a=1")
2.删除a=7的记录:db.Execute("delete from test where a=7")
3.添加一条新记录(a=11,b=12,c=13):db.Execute("insert into test values(11,12,13)")
序号 a b c
1 1 2 3
2 4 5 6
3 7 8 9
1.修改a=1的记录b的值为10:db.Execute("update test set b=10 where a=1")
2.删除a=7的记录:db.Execute("delete from test where a=7")
3.添加一条新记录(a=11,b=12,c=13):db.Execute("insert into test values(11,12,13)")
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-09-23
展开全部
用API函数吧!也只能这样了,(其实VB使用控件来操作数据库很方便的),下载个MSDN上面有详细的解释,
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-09-23
展开全部
刚看错了,看成了ADO,不好意思
Set db = OpenDatabase(sdbname)
db.Execute(sqlstr)
sqlstr就是操作语句,和刚才回答的一样
Set db = OpenDatabase(sdbname)
db.Execute(sqlstr)
sqlstr就是操作语句,和刚才回答的一样
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询