vb.net的數(shù)據(jù)庫操作問題，急?。。?！高分懸賞?。?！

添加DataGridView,將數(shù)據(jù)表綁定上,這個應(yīng)該會吧,DataGridView添加行處理事件,事件里提取內(nèi)容到文本框,也不需要確定按鈕,只需要增刪改查四個按鈕就能完成全部操作,不會再問

創(chuàng)新互聯(lián)是一家集網(wǎng)站建設(shè),武漢企業(yè)網(wǎng)站建設(shè),武漢品牌網(wǎng)站建設(shè),網(wǎng)站定制,武漢網(wǎng)站建設(shè)報價,網(wǎng)絡(luò)營銷,網(wǎng)絡(luò)優(yōu)化,武漢網(wǎng)站推廣為一體的創(chuàng)新建站企業(yè)，幫助傳統(tǒng)企業(yè)提升企業(yè)形象加強企業(yè)競爭力。可充分滿足這一群體相比中小企業(yè)更為豐富、高端、多元的互聯(lián)網(wǎng)需求。同時我們時刻保持專業(yè)、時尚、前沿，時刻以成就客戶成長自我，堅持不斷學(xué)習(xí)、思考、沉淀、凈化自己，讓我們?yōu)楦嗟钠髽I(yè)打造出實用型網(wǎng)站。

VB.NET怎么獲取本機的數(shù)據(jù)庫

這里以O(shè)ERACLE數(shù)據(jù)庫為例 ：

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 數(shù)據(jù)庫相關(guān)

判斷是否存在查詢結(jié)果這個有點問題！

修改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)

'把數(shù)據(jù)寫入到文本框

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("沒有查詢結(jié)果")

End If

End Sub

vb.net 怎么操作數(shù)據(jù)庫

如果樓主熟悉VB6，可以直接在項目中添加ADODB的Com引用，這樣你就可以像VB6那樣操作數(shù)據(jù)庫了！

另外

.NET Framework中連接數(shù)據(jù)庫要用到ADO.NET。如果要操作Access數(shù)據(jù)庫，要用到System.Data.OleDb命名空間下的許多類。

比如按樓主所說，“我想在textbox1中顯示表一中【一些數(shù)據(jù)】字段下的第一個內(nèi)容”：

'首先導(dǎo)入命名空間

Imports System.Data

Imports System.Data.OleDb

'然后在某一個事件處理程序中寫：

Dim conn As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=數(shù)據(jù)庫.accdb;Jet OLEDB:Database Password=MyDbPassword")

Dim command As New OleDbCommand("Select * From 數(shù)據(jù)表", conn)

conn.Open() '打開數(shù)據(jù)庫連接

Dim reader As OleDbDataReader = command.ExecuteReader() '執(zhí)行SQL語句，返回OleDbDataReader 對象

Do While reader.Read() '讀取一條數(shù)據(jù)

textbox1.Text += reader("一些數(shù)據(jù)") VbCrLf

Loop

reader.Close() '關(guān)閉OleDbDataReader

conn.Close() '關(guān)閉連接