Private Sub Form_Click()
Dim db As New ADODB.Connection, RS As New ADODB.Recordset 'ADO連接對(duì)象和記錄集
Dim strSQL As String 'SQL字符串
db.ConnectionString = "provider=Microsoft.Jet.OLEDB.4.0;Data source =" &amp; App.Path &amp; "/xs.mdb" '數(shù)據(jù)庫(kù)連接
db.Open '打開(kāi)數(shù)據(jù)庫(kù)

strSQL = "select * from xj" 'SQL字符串
RS.Open strSQL, db, 3, 1 '查詢數(shù)據(jù)表
Do While Not RS.EOF '循環(huán)輸出查詢到的結(jié)果
Print RS!姓名; RS!性別; RS!班級(jí); RS!出生年月 '在窗口中打印輸出結(jié)果
RS.MoveNext '記錄下移
Loop
RS.Close '關(guān)閉記錄集
Set RS = Nothing
End Sub

以上所述就是本文的全部?jī)?nèi)容了，希望大家能夠喜歡。

您可能感興趣的文章:

相關(guān)文章

淺談如何使用vb.net從數(shù)據(jù)庫(kù)中提取數(shù)據(jù)
這篇文章主要介紹了淺談如何使用vb.net從數(shù)據(jù)庫(kù)中提取數(shù)據(jù)，使用VB提取數(shù)據(jù)，是先查找，做成數(shù)組，再顯示到數(shù)據(jù)里，如果感興趣可以了解一下
2020-07-07
VB實(shí)現(xiàn)的16位和32位md5加密代碼分享
這篇文章主要介紹了VB實(shí)現(xiàn)的16位和32位md5加密代碼分享,需要的朋友可以參考下
2014-07-07
什么是一個(gè)高效的軟件
什么是一個(gè)高效的軟件...
2006-10-10
使用WMI得到計(jì)算機(jī)的信息
WMI是一項(xiàng)行業(yè)推薦規(guī)范，旨在為訪問(wèn)企業(yè)環(huán)境中的管理信息而開(kāi)發(fā)一種標(biāo)準(zhǔn)化技術(shù)。該信息包括系統(tǒng)內(nèi)存的狀態(tài)、當(dāng)前安裝的客戶應(yīng)用程序清單，以及有關(guān)客戶端狀態(tài)的其他數(shù)據(jù)
2019-04-04
VB返回記錄集結(jié)果到HTML表格的方法
這篇文章主要介紹了VB返回記錄集結(jié)果到HTML表格的方法,實(shí)例分析了VB獲取記錄集與HTML表格生成的相關(guān)技巧,需要的朋友可以參考下
2015-06-06
VBA中連接SQLSERVER數(shù)據(jù)庫(kù)例子
這篇文章主要介紹了VBA中連接SQLSERVER數(shù)據(jù)庫(kù)例子,VBA是指Visual Basic for Applications,是Visual Basic的一種宏語(yǔ)言,需要的朋友可以參考下
2014-07-07
VB的TextBox文本框?qū)崿F(xiàn)垂直居中顯示的方法
這篇文章主要介紹了VB的TextBox文本框?qū)崿F(xiàn)垂直居中顯示的方法,比較實(shí)用的功能,需要的朋友可以參考下
2014-07-07
VB使用XMLHTTP實(shí)現(xiàn)Post與Get的方法
這篇文章主要介紹了VB使用XMLHTTP實(shí)現(xiàn)Post與Get的方法,有一定的借鑒價(jià)值,需要的朋友可以參考下
2014-07-07
VB中使用WMI獲取系統(tǒng)硬件和軟件有關(guān)信息
WMI是英文Windows Management Instrumentation的簡(jiǎn)寫(xiě)，它的功能主要是：訪問(wèn)本地主機(jī)的一些信息和服務(wù)，可以管理遠(yuǎn)程計(jì)算機(jī)（當(dāng)然你必須要擁有足夠的權(quán)限），比如：重啟，關(guān)機(jī)，關(guān)閉進(jìn)程，創(chuàng)建進(jìn)程等
2019-04-04
VB獲取文件大小的方法
這篇文章主要介紹了VB獲取文件大小的方法,可實(shí)現(xiàn)準(zhǔn)確獲取文件大小的功能,需要的朋友可以參考下
2015-06-06