189 8069 5689
如果楼主熟悉VB6，可以直接在项目中添加ADODB的Com引用，这样你就可以像VB6那样操作数据库了！
创新互联专注于凌海网站建设服务及定制，我们拥有丰富的企业做网站经验。 热诚为您提供凌海营销型网站建设，凌海网站制作、凌海网页设计、凌海网站官网定制、微信小程序开发服务，打造凌海网络公司原创品牌,更为您提供凌海网站排名全网营销落地服务。
另外
.NET Framework中连接数据库要用到ADO.NET。如果要操作Access数据库，要用到System.Data.OleDb命名空间下的许多类。
比如按楼主所说，“我想在textbox1中显示表一中【一些数据】字段下的第一个内容”：
'首先导入命名空间
Imports System.Data
Imports System.Data.OleDb
'然后在某一个事件处理程序中写：
Dim conn As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=数据库.accdb;Jet OLEDB:Database Password=MyDbPassword")
Dim command As New OleDbCommand("Select * From 数据表", conn)
conn.Open() '打开数据库连接
Dim reader As OleDbDataReader = command.ExecuteReader() '执行SQL语句，返回OleDbDataReader 对象
Do While reader.Read() '读取一条数据
textbox1.Text += reader("一些数据") VbCrLf
Loop
reader.Close() '关闭OleDbDataReader
conn.Close() '关闭连接
给个思路。
一、Entity Framework （EF）
引用了EF后，在EF 的datacontext将你的access数据库配置上。你的增删改查等都需要你在业务中去定义。
datagridview控件是Winform里面的吧，你只要在数据库定义的时候每条数据都有一个递增的ID，然后你显示数据的时候顺序使用ID desc就行了。
二、 ADO.net
做个Accesshelper类，使用connetion,command,reader等对象对Access数据库进行各类操作。
这种情况下，通行的做法是：配置ODBC，每个服务器添加一个固定名字的SQL连接，通过这个ODBC访问该服务器的数据库。
例如，下面图中的aaa就是本机数据库的访问，已配置sa密码，可访问和修改任意数据。
VB.NET中有控件可以真接接点击属性进行连接配置.
SqlConnect数据连接控件.点击ConnectionString属性进行配置就可以了.
VB.NET中没有RecordSet了.取而代之的是DataSet.
在VB.net中可以先用SqlConnection对像来连接数据库再用SqlDataAdapter对像来读取数据并填充到DataSet里.然后就可以进行数据绑定了.
例:
dim
conn
as
SqlConnection
dim
da
as
SqlDataAdapter
dim
ds
as
Dataset
set
conn
=
new
SqlConnection
conn.ConnectionString="server=serverIP;database=databasename;uid=userid;pwd=password";
conn.open
da
=
new
SqlDataAdapter
(,conn)
da.fill(ds)
使用ADO~~先利用数据控件oleconnection连接到数据库,即在oledbconnection的Connectstring属性输入路径,
然后使用oledbcommand并在commandtext中选择查询,再使
用oledbdataadapter选择配置数据适配器,生成dataset
注:
1 oledbcommand 主要使用SQL命令
2 oledbdataadapter相当于在本地建一个表,有什么操作可以操作完后将结果传回源表
在web.config中配置：
’连接oracle
dim
strconnect
as
string
=
system.web.configuration.webconfigurationmanager.connectionstrings("conn").tostring()
dim
conn
as
oledb.oledbconnection
=
new
system.data.oledb.oledbconnection(strconnect)
’返回数据
public
function
gettable(byval
sql)
conn.open()
dim
comm
as
oledb.oledbcommand
=
new
oledb.oledbcommand(sql,
conn)
dim
da
as
oledb.oledbdataadapter
=
new
oledb.oledbdataadapter(comm)
dim
dt
as
system.data.datatable
=
new
system.data.datatable()
da.fill(dt)
conn.close()
return
dt
end
function
’返回受影响的行数
public
function
impactdate(byval
sql)
conn.open()
dim
comm
as
oledb.oledbcommand
=
new
oledb.oledbcommand(sql,
conn)
dim
i
as
integer
=
comm.executenonquery
return
i
end
function