office交流網(wǎng)--QQ交流群號(hào)及微信交流群

Access培訓(xùn)群:792054000         Excel免費(fèi)交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

微信交流群(請(qǐng)用微信掃碼)

        

Access實(shí)現(xiàn)在同一文本框中多字段模糊查詢(xún)

2018-01-08 14:24:00
tmtony8
原創(chuàng)
10730

在貼吧中看到有網(wǎng)友有這樣的疑問(wèn)?!霸谥挥幸粋€(gè)搜索框的條件下,如何實(shí)現(xiàn)兩個(gè)搜索條件的搜索”

比如,一個(gè)學(xué)籍管理窗體里,在一個(gè)搜索框里可以直接輸入名字或者學(xué)籍號(hào)來(lái)搜索(一次只能輸其中一種),而不用一個(gè)搜索條件弄一個(gè)搜索框?即在一個(gè)文本框中可以篩選關(guān)于多個(gè)字段的數(shù)據(jù)。

一般為了保證查詢(xún)的速度,我們會(huì)一個(gè)文本框查詢(xún)一個(gè)條件。當(dāng)然也不排除上面這種一個(gè)文本框多個(gè)條件的情況。我們是如何做的呢?


如有表“學(xué)生”,字段“學(xué)號(hào)”和“姓名”,子窗體“學(xué)生子窗體”。窗體中按鈕“Command1”和文本框“Text0”

方法1、在查詢(xún)中用“or” 設(shè)置多個(gè)條件,如下代碼:

Private Sub Command2_Click()
    Dim strSql As String
    strSql = "Select * from 學(xué)生 where 姓名 like '*" & Me.Text0 & "*' or 學(xué)號(hào) like '*" & Me.Text0 & "*' "
    Me.學(xué)生_子窗體.Form.RecordSource = strSql
    Me.學(xué)生_子窗體.Requery
End Sub






方法2、利用查詢(xún)作為子窗體記錄源

創(chuàng)建一個(gè)名為“查詢(xún)1”的查詢(xún)。把名字和學(xué)籍號(hào)合成一個(gè)字段,然后用這個(gè)查詢(xún)作為子窗體的記錄源。同時(shí)隱藏新合并的字段



同理,篩選我們用RecordSource就可以了。代碼如下

Private Sub Command2_Click()
    Dim strSql As String
    strSql = "Select * from 查詢(xún)1 where 信息 like '*" & Me.Text0 & "*'"
    Me.學(xué)生_子窗體.Form.RecordSource = strSql
    Me.學(xué)生_子窗體.Requery
End Sub





分享
文章分類(lèi)
聯(lián)系我們
聯(lián)系人: 王先生
Email: 18449932@qq.com
QQ: 18449932
微博: officecn01
移動(dòng)訪問(wèn)