大橙子网站建设,新征程启航

为企业提供网站建设、域名注册、服务器等服务

vb.net内部数据库 VB中数据库的访问技术

vb.net的数据库操作问题,急!!!!高分悬赏!!!

添加DataGridView,将数据表绑定上,这个应该会吧,DataGridView添加行处理事件,事件里提取内容到文本框,也不需要确定按钮,只需要增删改查四个按钮就能完成全部操作,不会再问

创新互联是一家集网站建设,武汉企业网站建设,武汉品牌网站建设,网站定制,武汉网站建设报价,网络营销,网络优化,武汉网站推广为一体的创新建站企业,帮助传统企业提升企业形象加强企业竞争力。可充分满足这一群体相比中小企业更为丰富、高端、多元的互联网需求。同时我们时刻保持专业、时尚、前沿,时刻以成就客户成长自我,坚持不断学习、思考、沉淀、净化自己,让我们为更多的企业打造出实用型网站。

VB.NET怎么获取本机的数据库

这里以OERACLE数据库为例 :

Provider=MSDAORA;data source =主机名:1521/ORCL;User ID=system;Password=ORACLE;Unicode=True

Dim myConn As Data.OleDb.OleDbConnection

myConn = New System.Data.OleDb.OleDbConnection()

myConn.ConnectionString = strCon

myConn.Open()

VB.net 数据库相关

判断是否存在查询结果这个有点问题!

修改If MyDataSet.Tables.Count 0 Then 为 If ds.Tables(0).Rows.Count 0 Then

Private Sub DataGridfill(ByVal CmdText As String)

Dim engin As New MyDbEngine

Dim MyDataSet As DataSet

engin.OpenConnect()

MyDataSet = engin.ExecuteDataSet(cmdtext)

engin.CloseConnect()

If ds.Tables(0).Rows.Count 0 Then

Me.DataGridView1.DataSource = MyDataSet.Tables(0)

'把数据写入到文本框

For i = 0 To DataGridView1.RowCount - 1

Panel1.Controls.Item(i).Text = DataGridView1.CurrentRow.Cells.Item(i).Value.ToString

Panel1.Controls.Item(i).Enabled = False

Next

Else

MsgBox("没有查询结果")

End If

End Sub

vb.net 怎么操作数据库

如果楼主熟悉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() '关闭连接


分享标题:vb.net内部数据库 VB中数据库的访问技术
文章位置:http://dzwzjz.com/article/hjjjdo.html
在线咨询
服务热线
服务热线:028-86922220
TOP