Microsoft Access 掲示板

複数項目の検索画面を一画面で検索したい / 2

11 コメント
views
4 フォロー
2

現在は【検索目的】ごとに、検索画面を作成しております
見よう見まねで作動いたしておりますが
【検索目的】を変更する場合に
現在の画面を閉じて、別な画面を立ち上げております

Private Sub メニューを閉じる_Click()
  DoCmd.Quit acQuitPrompt

End Sub

Private Sub Form_Current()

End Sub

Private Sub 解除ボタン_Click()
 Me.FilterOn = False
 Me.検索.Value = ""
End Sub

Private Sub 検索ボタン_Click()

 Me.Filter = "行先 like'" & 検索 & "'"
 Me.FilterOn = True

End Sub

通報 ...