Access2010でMe.Filterを使って検索すると、勝手に元のテーブルのデータが更新される

Question

●経緯：
Access2010を使って、データベースを検索して参照、変更して保存、新規作成等ができるフォームを作ろうとしています。
最終的な目的は [検索]、[保存]、[新規]等のボタンを作成し、それぞれのボタンを押したときに該当の動作をするフォームにしたいと思います。

下記のようなテーブルを一つ作成しています。

ID	品名	価格
1	パソコン	¥100,000
2	マウス	¥500
3	キーボード	¥1,000

フォームはごく単純に[フォームウィザード]の「単票形式」で作成。
フォーム内のボタンは[プロパティ]→[イベント]→クリック時の[コードビルダー]からVBAにて記載しました。

●わからないこと：
現在、AccessのVBAで下記のコマンドを組んで動作を確認していますが、検索ボタン（コマンド7_Click）をクリックした時点で勝手に元のテーブルがフォーム内に打ち込んだ文字列に変更されてしまいます。
例えば、ID1の「パソコン」が表示された状態でフォームの「品名」に「キーボード」と打ち込むと、検索ボタンを押した時点でテーブルのID1の品名が「キーボード」になってしまいます。

理想としては、元のテーブルのデータを変更せずに、検索した結果をフォーム内に表示したいのですが、どのようにすればよいのでしょうか？

Private Sub コマンド7_Click()
    Me.Filter = "品名 like'*" & 品名 & "*'"
    Me.FilterOn = True
End Sub

Private Sub コマンド8_Click()

End Sub

●試したこと：
下記の操作では、元のテーブルは勝手に変更されませんでした。

・「品名」内を変更して何もしない
・「品名」内を変更して「価格」等の他のボックスに入力カーソルを移す
・「品名」内を変更して[Enter]キーを押す
・サブプロシージャ内が空欄（何もしない）ボタン（コマンド8_Click）を作成し、そのボタンをクリック

下記の操作では元テーブルのデータも変わらず、正常に検索結果がフォームに反映されました。
・新たに「テキストボックス」を一つ作成し、Filterをかける際のテキストをそのテキストボックスから参照

元テーブルのデータが変更されてしまう基準がよくわかりません。
検索文字列の入力と検索結果の表示を同じテキストボックスで併用する使い方は一般的ではないのでしょうか？

Answer 1

検索文字列の入力と検索結果の表示を同じテキストボックスで併用する使い方は一般的ではないのでしょうか？

そんな使い方はしません。
検索では別なテキストボックスを使用します。（この時コントロールソースは使用しない。）

検索ボタン（コマンド7_Click）をクリックした時点で勝手に元のテーブルがフォーム内に打ち込んだ文字列に変更されてしまいます。

勝手にではありません。テーブルとリンクした項目に値を入れ、
filterでレコードが移動すると、当然テーブルに値が更新されます。

理想としては、元のテーブルのデータを変更せずに、検索した結果をフォーム内に表示したいのですが、どのようにすればよいのでしょうか？

別なテキストボックスで検索すれば、問題は無いかと思います。

Comments

[ot2os]

ありがとうございます。
ご提案通り、素直に別のテキストボックスで検索する方式にします。

ちなみに、あまり必要ないかもしれませんが、検索と結果表示を同じテキストボックスで併用する場合のコードを書きました。
こちらはテーブルが更新されずに検索結果を出すことができました。

Private Sub コマンド7_Click()
Dim str As String

str = 品名
Screen.ActiveForm.Undo
Me.Filter = "品名 like'*" & str & "*'"
Me.FilterOn = True
End Sub

また、下記のコードを仕込むことで、テーブルの意図しない更新を防止することができました。
うっかりミスを防ぐため、こちらの方式を使おうと思います。

Private Sub Form_BeforeUpdate(Cancel As Integer)
If MsgBox("データ更新しますか？", vbYesNo, "確認") = vbNo Then
Screen.ActiveForm.Undo
End If
End Sub

[sazi]

老婆心でコメントすると、根本の手当てをせずイベントなどでのif文による分岐で対応するやり方をしていると、機能の追加で影響が出て分岐をさらに追加するようになりスパゲッテーソースが出来上がることになります。（イベントが複合してくると本当に収拾がつかなくなります）
経験不足の場合、無理からぬことではありますが、経験者談ということで。