vb更新資料庫
更新資料庫的SQL語句通過Update。
語法：
UPDATE 表名稱 SET 列名稱 = 新值 WHERE 列名稱 = 某值
示例：
'更新Person表的地址（address）和城市名稱（city），條件是LastName等於Wilson
UPDATEPersonSETAddress='Zhongshan23',City='Nanjing'
WHERELastName='Wilson'
2. vb update更新資料庫，更新很多欄位如何編寫啊
可以用ADO方法
rsCnn = "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & DataPath & ";mode=Read|write"
rsTmp.Open "Select * From 時刻段電量 ", rsCnn, adOpenDynamic, adLockBatchOptimistic
With rsTmp
!峰數據 = rsTmp1.Fields(strName(k) & "峰").Value
!平數據 = rsTmp1.Fields(strName(k) & "平").Value
!谷數據 = rsTmp1.Fields(strName(k) & "谷").Value
!總數據 = !峰數據 + !平數據 + !谷數據
.UpdateBatch
End With
Set rsTmp = Nothing
3. 在VB中如何實現按鈕與資料庫相連接`以及資料庫的自動更新
ADO控制項與資料庫連接代碼如下
Dim
conn
As
New
ADODB.Connection
Dim
rs
As
New
ADODB.Recordset
Private
Sub
Command1_Click()
'插入數據：
If
rs.State
<>
adStateClosed
Then
'檢查記錄集狀態
rs.Close
End
If
rs.Open
"insert
into
T_user(name,age)
values('"
&
txtname.Text
&
"',"
&
txtage
&
")",
conn,
adOpenDynamic,
adLockBatchOptimistic
If
rs.State
<>
adStateClosed
Then
rs.Close
End
If
'更新DataGrid1數據
rs.Open
"select
*
from
T_user",
conn,
adOpenDynamic,
adLockBatchOptimistic
Set
DataGrid1.DataSource
=
rs
End
Sub
Private
Sub
Form_Load()
conn.Open
"Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=C:\Documents
and
Settings\hb\桌面\db1.mdb;Persist
Security
Info=False"
conn.CursorLocation
=
adUseClient
'游標放在客戶端
rs.CursorLocation
=
adUseClient
rs.Open
"select
*
from
T_user",
conn,
adOpenDynamic,
adLockBatchOptimistic
Set
DataGrid1.DataSource
=
rs
End
Sub
Private
Sub
Form_Unload(Cancel
As
Integer)
rs.Close
'釋放
conn.Close
Set
rs
=
Nothing
Set
conn
=
Nothing
End
Sub
4. vb怎麼更新資料庫中一條數據
添加： 』下面這句連接資料庫指定表的所有欄位 Adodc1.RecordSource = "select * from 庫存表" 』下面這句添加記錄 Adodc1.Recordset.AddNew 下面4句就是通過4個TEXTBOX控制項輸入欄位的數據，如果是數字類型可以加VAL Adodc1.Recordset.Fields