1. 用VB做一個資料庫該怎麼做給點思路 或者從哪下手
大致有以下幾步:讀取文件 -- 格式化數據 -- 關閉文件 -- 使用數據如果數據量較大,需要進行篩選,且存放數據的源文件可能不定時變更,那麼我們可以用一個臨時文件來存放有用的數據,這樣可大大提高程序的效率.要 [格式化數據]時,我們首先要進行篩選,然後還得進行分類,這樣文件中的字元串才能被轉換成有用的信息來供程序使用.這樣一來,不用說,處理速度將大大減慢,而且就算你設計的數據格式比較科學,當數據量非常大時,文件的容量也會變的讓普通計算機無法承受. 相對文本文件來說資料庫的使用也大致分為以下幾步:打開資料庫 -- 查找數據 -- 使用數據 -- 關閉資料庫從中可以看出,裡面少了一步格式化數據,因為資料庫本身在存儲數據時,它就是按照一定的格式來進行存儲的. 其次是,資料庫與文本文件返回數據的方法不同.如果把文本文件比作一個Textbox 的話,那麼資料庫更像是一個ListBox.使用文本文件時我們需要從整個Textbox中取出有用的信息,並進行處理,而Listbox則可以根據需要返回特定的某一項.由於VB本身並不帶有可以訪問資料庫的類,所以我們需要引用一個包含能訪問資料庫的類來使用資料庫.這里我們採用ADODB,相比DAO和能訪問資料庫的API來說,它比DAO更靈活,更強大;而比起API,它更簡單易用,更適合初學者.而Access資料庫比起SQL,也相對簡單了很多,且能夠滿足中小型應用程序的需要,所以我們在使用資料庫時,選擇了Access.就像使用文本文件來存儲數據一樣,我們需要先設計好數據結構,只不過在設計Access資料庫的結構時,我們需要用到其它的程序來進行詳細的規劃.建議採用的程序是office中的Access或VB自帶的VISDATA.當資料庫設計好了以後,我們可以開始"資料庫編程"了.首先,我們需要引用ADO.具體的方法是,在"工程" -- "引用" 中,找到"Microsoft ActiveX Data Object *.* Library",這里的"*.*"是指的時ADO的版本號,一般來說,應用程序或ActiveX控制項都具有向下兼容性,所以我們盡可能選擇比較新的版本.以確保程序在能識別舊版本Access的同時,也能識別較新版本的Access.然後我們需要在程序中創建一個對象.就好比我們在窗體上添加一個FileBox才能看到文件名一樣,只有創建了ADO對象,我們才能夠訪問資料庫.常用的對象有兩個,Connection和Recordset.創建這兩個對象的具體方法是:1.在引用後,使用New關鍵字,如 Private Conn As New ADODB.Connection Private Reco As New ADODB.Recordset2.在沒引用時,用CreateObject創建對象: Dim Conn,Reco Set Conn = CreateObject("ADODB.Connection") Set Reco = CreateObject("ADODB.Recordset")創建了對象之後,下一步我們要做的就是打開資料庫了.先看下面的代碼,可以成功的打開資料庫. Conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\Main.mdb" 這句代碼打開了D盤中的Main.mdb這個資料庫. Connection.Open方法的第一個參數是連接代碼,它將傳遞給系統的資料庫引擎.前半部分"Provider= Microsoft.Jet.OLEDB.4.0",它表示了資料庫的類型.不同的資料庫可能會不同.後半句"Source=d:\main.mdb"它表示了資料庫所在的絕對路徑.打開資料庫之後,還要打開表.假如資料庫中有一個表,表名為"Users",欄位有兩個,一個為用戶名,一個為密碼.那麼看以下代碼.1.想返回"Users"中,[用戶名]為"去年煙花"的[密碼] Recordset.open "Select 密碼 From Users Where 用戶名='去年煙花'",Connection,1,1 之後我們就可以把用戶輸入的密碼進行比較,看是否允許登錄. If Recordset.eof and Recordset.bof then Msgbox "用戶不存在!",16 Else If PassWord =Recordset("密碼").value then msgbox "登錄成功!",64 Else msgbox "密碼錯誤!",32 End If End If Recordset.Close2.假設Admin已經成功登錄系統,我們想把所有的用戶名和密碼都顯示出來 Recordset.open "Select * From Users",Connection,1,1 這時,表已經被打開,我們就用以下代碼把它顯示出來. Do whlie Not Recordset.eof Print "用戶名: " & Recordset("用戶名").value & "密碼: " & Recordset("密碼").value Recordset.MoveNext Loop Recordset.Close由以上代碼示例可以看出,打開表時,可以只打開其中的一個欄位,也可以打開所有.第一個參數是SQL語句.Select [欄位名] From 表名 [Where 條件]這里的條件可以省略.且欄位名也可以用"*"來代替所有欄位.需要注意的是,如果你用(1)中的方法打開,那麼(2)後面顯示的代碼就不能再用在(1)中.因為(1)里並沒有打開[用戶名]欄位,所以這一句Recordset("密碼")就沒有值存在,還有可能出錯.後面的條件,可以用"="、">"、"<"等運算符.比如 "Where ID > 32".(這里假設[ID]為數字型.) 這是打開的部分.第二個很重要的部分就是查詢記錄.資料庫它並不是把所有記錄全部放到一個變數中備用的.而是以"當前記錄"的形式來返回一個值.所以我們想從中找到有用的信息,就必須要對信息進行定位/篩選.定位: 移動到下一條 Recordset.MoveNext 移動到上一條 Recordset.MovePrevious 移動到最後一條 Recordset.MoveLast 移動到第一條 Recordset.MoveFrist 移動到某一條 Recordset.Move Number篩選: Recordset.Find "條件"如:[用方法(2)打開表之後] Private Sub Command1_Click() Recordset.Find "用戶名=" & "text1.text" If Recordset.Eof <> True Then Msgbox "該用戶的密碼是:" & Recordset("密碼").value,64 Else Msgbox "未找到該用戶的資料!",16 End If End SubMoveNext 只有當Eof不為True時,才可用,否則發生錯誤.而MovePrevious剛是Bof不為True時.... 而只要Eof 和 Bof中有一個不為真時,也就是說只要有一條記錄時,它就可以使用. Find 方法中的條件和Open時的第一個參數中的條件表述方法是完全一致的.當在已打開的記錄集中,找不到該記錄時,Eof為True.找到則當前的值就是符合條件的記錄. 第三個部分就是添加/修改記錄. 修改記錄很簡單,先按以上的方法找到相關記錄之後,給記錄賦值就可以了. 比如:[(修改密碼)按方法(1)打開表之後] Recordset("密碼").value = "123456" Recordset.Updata 需要注意的就是,在修改完成後,要調用Updata方法,這樣修改才能生效.而添加記錄則可以用以下代碼來實現: Recordset.addnew Recordset("用戶名").value = "Admin" Recordset("密碼").value = "Admin" Recordset.Updata這里,先要調用Addnew方法,增加一條新記錄,然後對這個新記錄中的各欄位賦值,最後再調用Updata方法.到這里就差不多了,最後說一下上面提到的幾個方法.Recordset.Open SQL語句,數據源,游標類型,打開方法SQL語句不用說了,就是Select那啥的,目的就是按要求從表中返回數據 數據源就是一個打開之後的Connection對象. 去他媽的游標類型,填1就可以了 [偷笑ing] 打開方法對應了幾個常數,具體哪幾個可以從對象瀏覽器里看. 對應數值的意義: 1 只讀 2 獨占 3 可寫 4 自已可寫,別人可讀Connection.open 連接代碼,伺服器用戶名,密碼 這里的連接代碼就不在多說了,伺服器用戶名,密碼只有在連接遠程資料庫時才用到.
2. 如何在VB中實現網路資料庫編程
用資料庫控制項比如ADODC與
網路資料庫
連接，然後其他用來輸出的控制項比如DataGrid再與資料庫控制項綁定即可。
資料庫只要建立了連接，那麼在使用過程中對於程序而言就沒有
本地資料庫
與網路資料庫之分了，操作都是完全一樣的，資料庫搜索引擎會自動完成數據的上傳和下載。
3. 誰知道在哪可以下到好的數據結構的視頻謝了~
05嚴蔚敏
鏈接：https://pan..com/s/1yX9mrSTpXmC-yknUK4eL2w
若資源有問題歡迎追問~