最近兩天剛剛開始自學access,制作了一個查詢系統。
我想要實作的是在查詢內容不存在時,能彈出msgbox詢問是否顯示所有內容。
msgbox的函式我都已經學習了,也寫進了查詢的代碼里面,但是實際上這條代碼并不能實作。在查詢不存在的內容時,只會顯示空白。
下面是我的查詢代碼中有關msgbox的代碼,請教大神如何正確實作。
If DCount("*", "研發部庫存", "貨架 & 貨架備注 & 名稱 Like '*" & Me.關鍵字 & "*'") = 0 Then
If MsgBox("貨物不存在,是否查看全部貨物?", vbQuestion + vbOKCancel) = vbOK Then
Me.child13.Form.RecordSource = "SELECT * FROM 研發部庫存"
End If
End If
轉載請註明出處,本文鏈接:https://www.uj5u.com/shujuku/54263.html
標籤:Access
下一篇:關于django的問題
