如果楼主熟悉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()
'关闭连接
方法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中显示了数据库的信息
VB读取数据库并显示出来的方法可参考下面用控件的实现方法:
ACCESS数据库,用VB6里的Data控件,选中它,设置属性:
DatabaseName 属性:连接到数据库文件
RecordSource 属性:连接数据表(可以用Select语句返回记录集)
然后使用它的:data1RecordsetFields(“字段名”),就可以返回获得你说的内容了。
以上就是关于vb.net 怎么 *** 作数据库全部的内容,包括:vb.net 怎么 *** 作数据库、在VB中,怎样对SQL数据库里面的数据进行 *** 作、VB怎样读取数据库并显示出来等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)