ACCESS2010 サブフォームの検索結果表示

質問

ACCESS初心者ですが以下のようなことをやりたいと思っています

テキストボックスに検索したい文言を入力。
ボタンを押下すると
検索結果をサブフォームに一覧表示で抽出。

現在は、検索機能自体は動くのですが
検索結果が一件ずつしか抽出されません。
一覧表示させるためにアドバイスをお願い致します。

OS:Windows7
Access Version:ACCESS 2010

テキストボックス名：テキスト17
コマンドボタン名：コマンド51
サブフォーム名：310キーワード検索フォーム

Private Sub コマンド51_Click()

DoCmd.SelectObject acForm, "310キーワード検索フォーム"
If Me.テキスト17 <> "" Then
Me.Form.Filter = "メモリ容量 like '*" & Trim(Me!テキスト17) & "*' or 寸法 like '*" & Trim(Me!テキスト17) & "*' or 取扱上の注意点 like '*" & Trim(Me!テキスト17) & "*' or 備考 like '*" & Trim(Me!テキスト17) & "*' or メーカー like '*" & Trim(Me!テキスト17) & "*' or 付属品 like '*" & Trim(Me!テキスト17) & "*' or 貸出状況 like '*" & Trim(Me!テキスト17) & "*'"
Me.Form.FilterOn = True

ElseIf IsNull(テキスト17) Then
Beep
MsgBox "条件を入れてください。", vbOKOnly, ""

End If

End Sub

回答No.1

hatena1989

情報不足です。下記の点について回答ください。

「サブフォーム」というのは、メインフォーム上に埋め込まれているフォームでよろしいですか。（たまに、メニューフォームから呼び出されるフォームのことをサブフォームという人がいますので、念の為に）

コマンド51 というのはメインフォーム上にありますか。サブフォーム上にありますか。

メインフォームは連結ですか、非連結ですか（レコードソースの設定はどうなってますか）。

連結の場合、メインフォームのレコードソースとサブフォームのレコードソースの関係は？
同じテーブル、あるいは一対多の関係、・・・・など。

サブフォームコントロールの「リンク親フィールド」「リンク子フィールド」は何か設定してますか。

サブフォームの「規定のビュー］の設定はどうなってますか。