vb資料庫表格資料庫數據

『壹』 vb中使用表格控制項瀏覽資料庫中的數據

1、用一個ADODC1控制項連接你的資料庫，在窗口中放一個
表格控制項
datagrid1
2、在一事件中（比如按鈕單擊事件、窗口載入事件）設置以下語句
adodc1.recordsource="select
……"(就是你的查詢語句）
adodc1.refresh
set
datagrid1.datasource=adodc1
在最後面加句結束語句:end
sub

『貳』 vb中怎麼實現數據表從一個資料庫里復制到另外一個資料庫

簡單說一下思路，我想代碼應該不會很難，首先要創建兩個資料庫連接，分別指向兩個資料庫。然後使用select語句從db1中把數據讀取出來放到一個結果集中保存起來。然後在使用循環，在循環當中使用insert語句逐條把db1中student表的數據插入到db2的student表就可以了。沒有什麼技術難度。

『叄』 怎樣從vb中向資料庫里添加數據

Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
conn.ConnectionString="" '數據存放路徑
conn.Open

Dim sql As String
sql="update 表名 set name='"& Text1.text &"',sex='"& Text2.text &"',phone='"& Text3.text &"'"
rs.open sql,conn,3,3
rs.Close
conn.Close
Text1是姓名文本框，Text2是性別文本框，Text3是電話號碼文本框。要注意我寫的電話號碼是字元型的。希望能幫到你。最好不要插入，更新比較好。

『肆』 在VB怎麼查詢資料庫中的數據啊！

1.一個簡單的查詢的例子：
'*定義一個連接
Dim Conn As ADODB.Connection
'*定義一個記錄集
Dim mrc As ADODB.Recordset
'*分別實例化
Set Conn = New ADODB.Connection
set mrc =New ADODB.Recordset
'*定義一個連接字元串
dim ConnectString as string
ConnectString="provider=microsoft.jet.oledb.4.0;data source=" & App.Path & "\data\資料庫名.mdb;jet oledb:database password=資料庫密碼"
'*打開連接
Conn1.Open ConnectString
'*定義游標位置
Conn1.CursorLocation = adUseClient
'*查詢記錄集(從student表中找出名子為"張三"的記錄)
mrc.open "select * from student where name='張三'",Conn, adOpenKeyset, adLockOptimistic

'*現在你已經得到了你想要查詢的記錄集了，那就是mrc
'*你可以把此記錄集與DataGrid榜定，用datagrid顯示你查詢的記錄
set me.datagrid.datasource=mrc

『伍』 如何用VB代碼向資料庫中添加數據表

'以下代碼可以向當前資料庫添加數據表
'(測試OK,添加"Table1"數據表，包含4個欄位)：
Set
NewTable
=
CurrentDb.CreateTableDef("Table1")
With
NewTable
.Fields.Append
.CreateField("欄位1",
dbText)
.Fields.Append
.CreateField("欄位2",
dbText)
.Fields.Append
.CreateField("欄位3",
dbText)
.Fields.Append
.CreateField("欄位4",
dbText)
End
With
CurrentDb.TableDefs.Append
NewTable

『陸』 VB如何讀取資料庫表格中新增加的數據

我有一個比較笨的辦法，第一步新建一個表和原表一樣，第二步就是在新增數據程序的同時也向新表加入新的一樣的數據，並將新表中過去的數據刪除（目的就是保證新表只有一條數據是最新的，如果是新增幾條，你就留下幾條，超過就刪除，自己控制）。第三步就是讀數據比較，就能找出新的數據來。

『柒』 vb 界面上顯示資料庫中的表內容

如果只是簡單的顯示，那麼可以用activex控制項裡面的dbgrid之類的，把他們綁定到數據源上面就可以顯示了。但是具體操作會比較復雜，建議在網上搜索一下dbgrid
vb，搜索結果第一條就講得很詳細

『捌』 vb如何操作資料庫表中的數據

'" + TextBox1.Text + "'"
=後面少了一個"

『玖』 vb6.0如何實現修改資料庫中的數據

從你這個界面看應該有兩種辦法實現數據更改。你不提供別的有用信息，只能簡單說一下了。
1、用 Data 數據控制項連接資料庫，直接對數據控制項中的數據更新
data1.Recordset.Edit
data1.Recordset("性別")=IIF(Option1.Value=True,"男","女")
data1.Recordset("聯系方式")=Trim(Text1)
data1.Recordset("郵編")=Trim(Text2)
data1.Recordset("地址")=Trim(Text3)
data1.RecordSet.Update

2、直接用SQL語句對數據進行更新
"Update 信息表 Set 性別='"+IIF(Option1.Value=True,"男","女")+"', 聯系方式='"+Trim(Text1)+"', 郵編='"+Trim(Text2)+"', 地址=『「+Trim(Text3)+"' WHERE 姓名=』XXX『」

哎，估計我說復雜了，希望對你有幫助...

『拾』 VB已讀取到資料庫數據，如何將數據寫入Excel表（OLE控制項）的某一單元格中，謝謝！

可對Ole控制項關聯對象的Excel表格的單元格的Value 屬性賦值來寫入VB已讀到的數據。

Value 屬性，返回或設置一個Variant型數，它指定該屬性之值，此屬性可讀/寫。

以下是實現代碼：

OptionExplicit
DimoBokAsObject'定義oBok為Object數據類型

PrivateSubCommand1_Click()
OLE1.CreateLink"C:zhang2012.xls"'打開要寫入的Excel表
SetoBok=OLE1.object'將對象引用賦給變數或屬性。
oBok.Sheets(1).Range("A1").Value="VB已讀取到資料庫數據"'將數據寫入Excel表的A列第一行
SetoBok=Nothing'使用Nothing關鍵字被將對象變數從實際對象中分離開來。
EndSub

Object 變數存儲為 32 位（4 個位元組）的地址形式，其為對象的引用。利用 Set 語句，聲明為 Object 的變數可以賦值為任何對象的引用。

注意 雖然以 Object 類型聲明的變數足以適應包含對各種對象的引用，但是綁定到變數引用的對象總是在晚期（運行時）綁定。要強迫在早期（編譯時間）綁定的話，須將對象的引用賦值給用特定類名稱聲明的變數。

使用 Nothing 關鍵字被將對象變數從實際對象中分離開來。要使用
Set 語句將 Nothing 賦值給對象變數。例如：

Set MyObject = Nothing

Set 語句，將對象引用賦給變數或屬性。