在VB中，怎样对SQL数据库里面的数据进行 *** 作

方法1，

建立一个模块

将工程的启动设置为 SUB MAIN

在模块里写下面代码

Public db As Database

Public rs As Recordset

Sub main()

set db=dbopendatabase("数据库路径"<建议用相对路径--就是把数据库文件和工程文件放在同一目录下--相对路径就是APPPATH+"数据库名带后缀">)

第一启动窗体<比如：form1>show

end sub

以后在其他窗体中如果要调用数据库只用在窗体中写代码

set rs=openrecordset(<可以是数据库的表--如"student",也可以是查询语句--如"select form student">)

这时数据库的内容都存在FILE集合里

比方说set rs=openrecordset("select form student")

rsfile(0)就是SQL语句查询结果的第一列

rsfiles就是整个结果

使用text1text=rsfile(0)就可以把文本框于查询结果帮定起来

如果要对数据库进行修这时用以下代码：

dbExecute （<SQL语句--如"insert into student(sno,sname) value("","")">)

方法2，

工程--部件--选择microsoft data bound grid control 50

然后在窗体中添加左边工具栏的 DATA 和DBGRID 控件

选择DBGRID 将属性DATASOURCE 设置为DATA控件的名字（如DATA1）

然后选择DATA 将属性CONNECT设置为ACCESSS 2000

设置DATABASENAME 选择数据库的存放路径

最后设置RECORDSET 为需要连接的表的名字

运行就可以看到 DATAGRID中显示了数据库的信息

两种办法，一种是 用SQL，另一种是ADO

1、用SQL添加数据：

insert into 表名（字段1，字段2，字段3）

values（值01，值02，值03）

例如：

docmdrunsql"insert into EmpTable(Name,age,Duty,Salary) values('王明',35,'外贸总监',12500)"

2、用ADO的办法：

ADO比较复杂，给你一个完整的例子吧：

Dim strSqlfitjc As String

strSqlfitjc = "select from 表"

Set RSfitjc = New ADODBRecordset ‘定义一个ADO连接，连进数据库

RSfitjcOpen strSqlfitjc, cn, adOpenKeyset, adLockOptimistic ’打开连接

RSfitjcaddnew '添加一个纪录

RSfitjcFields("配件编号") = “style” ‘给每个字段赋值

Update ’储存赋值的新纪录

Close 关闭连接

End With

如果楼主熟悉VB6，可以直接在项目中添加ADODB的Com引用，这样你就可以像VB6那样 *** 作数据库了！

另外

NET

Framework中连接数据库要用到ADONET。如果要 *** 作Access数据库，要用到SystemDataOleDb命名空间下的许多类。

比如按楼主所说，“我想在textbox1中显示表一中一些数据字段下的第一个内容”：

'首先导入命名空间

Imports

SystemData

Imports

SystemDataOleDb

'然后在某一个事件处理程序中写：

Dim

conn

As

New

OleDbConnection("Provider=MicrosoftACEOLEDB120;Data

Source=数据库accdb;Jet

OLEDB:Database

Password=MyDbPassword")

Dim

command

As

New

OleDbCommand("Select

From

数据表",

conn)

connOpen()

'打开数据库连接

Dim

reader

As

OleDbDataReader

=

commandExecuteReader()

'执行SQL语句，返回OleDbDataReader

对象

Do

While

readerRead()

'读取一条数据

textbox1Text

+=

reader("一些数据")

&

VbCrLf

Loop

readerClose()

'关闭OleDbDataReader

connClose()

'关闭连接

以上就是关于在VB中，怎样对SQL数据库里面的数据进行 *** 作全部的内容，包括:在VB中，怎样对SQL数据库里面的数据进行 *** 作、怎样用VB对access数据库进行数据添加、vb.net 怎么 *** 作数据库等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！