我把用adodc1綁定了表Case，并在窗體中用幾個Text跟表Case中的對應字段相綁定，我現在想直接通過修改Text(i).text來修改數據庫表Case中的記錄，問該如何修改，大俠們可否提供一下建議，并幫忙看看我的問題出在哪兒 ? Private Sub EditSaveCmd_Click() ? Adodc1.Recordset.Update ? Adodc1.Refresh ? MsgBox "修改成功！" ? Text1.SetFocus ? End Sub ?修改Text(i)中的內容后，要兩次點擊改修改保存按鈕后才能更新保存記錄。應該怎么辦才能一次點擊改按鈕就能立刻更新和保存修改記錄呢？感激不盡 ? 在線求教

?

?

? 這個問題是不是太簡單了，大家都不屑于回答啊？
? 希望大俠們賜教啊！著急啊！只看到部分代碼還不知道什么原因，但感覺表名有點不妥，可能會和VB的關鍵字Select Case有點沖突，改個其它的表名試試看
? 我又把表名改成了中文的“案件表”了，可是還是出現這個情況 ?
? 我是讓這幾個Text控件綁定數據庫，用來實現顯示，修改等功能，text(i).enable=true，每次修改text(i)的內容，后再點擊EditSaveCmd按鈕，用來更新保存數據，希望點擊后Text(i)里面立馬顯示更改后的數據，這問題最可能的原因是什么？應該比較簡單，只是沒看到代碼還不太清楚；你可以用ado方式打開數據庫，然后用text(i).text=rs!字段名 顯示數據庫，用rs!字段名=text(i).text rs.update更新數據少用ado控件感覺ADO控件很不好用，用ADODB連接也很方便啊

Public dbConn As ADODB.Connection '定義一個ADODB連接?
Public stuRs As ADODB.Recordset '定義Recordset對象?
Public SqlFindStr As String?

Public Function Conn2DB() As Boolean?
'公共Access數據庫連函數?

Dim connStr As String?
Dim dbName As String?

dbName = App.Path & "\" & "StudentDB.mdb" '返回程序所在路徑?

' Access連接字符串?
conStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & dbName?

Set dbConn = New ADODB.Connection '定義一個ADODB連接對象?

If dbConn.State <> adStateOpen Then '判斷ADODB連接是否打開?
dbConn.Open conStr '如果不是打開狀態 就打開連接?
End If?

Conn2DB = True?
End Function?

Public Function ExcSQL(ByVal sql As String) As ADODB.Recordset?
Dim rst As ADODB.Recordset?

'執行一條SQL查詢,得到一個記錄集?
Set rst = New ADODB.Recordset?
rst.Open Trim$(sql), dbConn, adOpenKeyset, adLockOptimistic '得到記錄?

Set ExcSQL = rst?
End Function

這是我的收藏啊，貢獻了，用這個更方便一點up你那樣好象只是添加了新記錄，把原來的覆蓋了吧？
adodc控件好象沒有自動重新加載數據的功能

要嗎你就把“Adodc1.Refresh ”這句注釋掉。

還是用ADO連接比較好控制

如何限制軟件的使用期限? ?
VC編寫的控件在VB下使用的問題
幫忙看看這句
msde的安裝方法
請問在vba中如何加載當前路徑dll
VB菜鳥求救：Stuff_MIS ? 查詢錯誤：標準表達式中數據類型不匹配
API中的GetComputerName如何調用?
autocad的文件怎么樣能導入vb中
怎么做字符串鏈表
高分求:將access數據庫中某個表中指定字段導出成字段寬度、類型有限制的viual ? foxpro表
關于考試試卷自動生成系統
如何限制軟件的使用期限? ?
如何限制軟件的使用期限?
使用excel數據源，不能正確顯示貨幣類型的小數……
LSet問題
急需ＶＢ或ＶＣ編程人員
vb中 ? 數字后面有個#是什么意思
求助：文件讀取問題
RowIsVisible ? 怎么樣顯示網格中被隱藏的行!我快干血了...
如何用CreatProgress函數成功啟動command.com程序
乘法溢出的問題
初次做VB的DLL，請大家幫忙！
權限被拒絕
Excel導入Sql ? server2000中openrowset的使用時奇怪問題!
什么品牌電腦好？
VB+ado+Access如何數據修改
VB怎樣只讀取字符串中的數字部分??
VC菜鳥關于生成exe文件無法運行的問題，在線等
老問題，如何將函數作為參數進行傳遞？
如何在WEB控件里點擊某文字連接??
100分懸賞rc2加密算法
關于按狃問題
一個邏輯上的問題
如何引用ACCESS ? 中窗體的文本框的值?
CSDN ? 快速搜索
關于LDAP連接的問題
最近用嘗試用VB做DLL，有問題請大家指教一下。
excel ? 后臺打印報表的問題？？？
如何使用web控件執行網頁操作??
inet.openurl的問題
關于 ? RasGetProjectionInfo ? 求 ? IP ? 地址的問題
DataGrid的用法：如何在datagrid中插入一列數據？
msflexgrid ? 用鼠標
連接一個dbf表 ? open ? 出錯 ? ?
怎么把RS數據綁定Data ? Report ? 的文本框控件上?
最好的視頻教程網站
在臺式機的800×600下編寫的VB程序，放到筆記本上字體太難看粗糙，但在1024×768下顯示時，字體雖然好看，但程序運行后的窗口只占液晶顯示器的一部分，有沒有適應屏幕分辨率的控件，自己編代碼實現太麻煩，因界面上控件太多。
請問一個ADO的問題
新手請教幾個簡單問題
webbrowser自動填表進階疑問：如何選完省再選市
急急急高分快速解決
VB中對表排序
急急急高分快速解決
高手請教一個正則表達式的問題
用VB的ADO訪問DBF文件出問題
連接sqlserver服務器,如果服務器關機的話,等待時間太長的問題怎么解決?
怎么回事啊!!高手進來看看
疑難問題: ? vb6.exe ? 中發生未處理的win32異常
AT ? 指令刪除短信問題
關于記錄集復制
sql ? server ? 如何使用VB6 ? 代碼進行數據庫文件（mdf,ldf）的 ? 附加和分離？
難度10:壓縮數據，然后解壓數據包，不要文件格式，怎么做？
請問VB.NET里的這句話在VB6里怎么實現？
菜鳥急題！sendkeys向一個java程序發送中文出現亂碼問題
--------取貨表 ? 到 ? 庫存貨架表 ? 中取貨的問題----- < <高級版 > >---- ?
一條sql語句插入值的問題
求助,那位大哥能幫忙解決本人將給予一定報酬
求助
國慶歸來散分
新手提問：關于如何使窗體自動適應圖片大小的問題
開發狀態下，怎么關閉所有的窗口，每次都要一個一個按
用vb生成word文檔，頁眉頁腳怎么生成呢?
想做觸摸屏瀏覽器上的軟鍵盤，可是關於WebBrowser中文本框焦點問題怎麼獲取呀？
關于獲取QQ游戲密碼的問題。只是研究。不是破壞！
有沒有辦法獨占方式訪問一個分區
如何使用wmi獲得系統信息如CPU內存大小硬盤大小主板型號等
如位有fpspr70.ocx控件,發下給我.謝謝啦
有沒有去掉整數后小數點的函數 ? 是小數點不是0
如何實現此文件操作？
ActiveReport整數怎樣可以不打印出小數點（SQL中money類型怎樣顯示出小于0的數前的0） ?
大家幫我以下,關于查詢的問題 ?
最近用嘗試用VB做DLL，有問題請大家指教一下。
最近自己嘗試做Dll，有問題大家幫忙
求一款翻譯軟件，急
文件關聯了以后，如何批量傳送COMMAND
求一個內存讀圖片的工具。
局域網內IP地址為什么會變
vb ? 的winsock控件如何實現一對多的連接
請問如何對DTPicker付值？
excel報表打印問題
整數怎樣可以不打印出小數點（SQL中money類型怎樣顯示出小于0的數前的0）
請問如何比較組織數中節點的屬性?
ActiveReport控件怎樣不打印小數點打印
整數怎樣可以不打印出小數點（SQL中money類型怎樣顯示出小于0的數前的0）
請問如何對一個date形變量付置？
求助 ? Datagrid控件和Adodc控件使用問題
進度條控制問題??
vb中的控件不能使用
救小弟，把查詢一列放在listview中，然后希望點擊某個格可以直接把它的值賦給text.怎么辦呀？
滿分，跪求！！！access的form控件 ? ? 窗體的“記錄源“（Record ? Source）屬性
更多vb開發資料，請訪問http://www.vbbaike.com/

總結

以上是生活随笔為你收集整理的VB+ADO+Access如何修改数据的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。