vb顯示資料庫數據
A. 如何使資料庫的內容在vb中顯示
大致上有兩者方法,一是用控制項,VB自帶的ADODC+DATAGRID,設置DataGrid.DataSource為ADODC即可
二是用代碼連接資料庫,通常用 ADO+DataGrid。引用ADO庫,定義Connection對象打開資料庫,Recordset對象執行查詢,並將數據顯示在DataGrid里。
B. 在VB中,怎樣對SQL資料庫裡面的數據進行操作
方法1,
建立一個模塊
將工程的啟動設置為 SUB MAIN
在模塊里寫下面代碼
Public db As Database
Public rs As Recordset
Sub main()
set db=db.opendatabase("資料庫路徑"<建議用相對路徑--就是把資料庫文件和工程文件放在同一目錄下--相對路徑就是APP.PATH+"資料庫名帶後綴">)
第一啟動窗體<比如:form1>.show
end sub
以後在其他窗體中如果要調用資料庫只用在窗體中寫代碼
set rs=openrecordset(<可以是資料庫的表--如"student",也可以是查詢語句--如"select* form student">)
這時資料庫的內容都存在FILE集合里
比方說set rs=openrecordset("select* form student")
rs.file(0)就是SQL語句查詢結果的第一列
rs.files就是整個結果
使用text1.text=rs.file(0)就可以把文本框於查詢結果幫定起來
如果要對資料庫進行修這時用以下代碼:
db.Execute (<SQL語句--如"insert into student(sno,sname) value("","")">)
方法2,
工程--部件--選擇microsoft data bound grid control 5.0
然後在窗體中添加左邊工具欄的 DATA 和DBGRID 控制項
選擇DBGRID 將屬性DATASOURCE 設置為DATA控制項的名字(如DATA1)
然後選擇DATA 將屬性CONNECT設置為ACCESSS 2000
設置DATABASENAME 選擇資料庫的存放路徑
最後設置RECORDSET 為需要連接的表的名字
運行就可以看到 DATAGRID中顯示了資料庫的信息
C. vb中如何把查詢到的數據顯示在msflexgrid上呢 請高手來圍觀解答啊
是否又是你在問這個問題了?
你連接的是否為Access 資料庫?下面以Access 資料庫為例子:
先看一下結果。
窗體中放置好各控制項,Form_Load()增加如下的程序:
Private Sub Form_Load()
With Data1
.Connect = "Access"
.DatabaseName = "D:vbTempmyDB.mdb" 『資料庫所在的全路徑及名稱
.RecordSource = "SELECT * FROM T101 ORDER BY F1" '這里的T101是我用的表名稱
.Refresh 』F1 是我用的欄位名稱
End With
End Sub
「查詢」按扭增加如下的程序:
Private Sub cmdFind_Click()
With Data1
.RecordSource = "SELECT * FROM T101 WHERE F1 Like '" + Trim(txtCode) + "*'"
.Refresh
End With
End Sub
1、添加 MSFlexGrid 控制項:
「工程」->"部件"->"選擇 Microsoft FlexGrid Control 6.0"->"確定"
2、Data 控制項應該會設置吧
3、窗體上放置該控制項,設置其 DataSource 屬性=Data1
3、添加需要的程序
4、程序中的 "F1" 是我用欄位名稱,代表的是「錯誤編號」
5、查詢中用 Like 語句可以獲得相關的結果,也可以用 "=" 但後面不需要*「符號
"SELECT * FROM T101 WHERE F1='" + Trim(txtCode) + "'"