Access フォームで検索した結果をフォームで表示するときにあいまい検索をしたい

Access2003を使用して、検索フォームをつくり、検索結果を別フォームへ表示させるプログラムを組みました。
その際に、かな検索をするとかなが完全一致でないと検索されません。
あいまい検索にてかな検索をする方法はありませんでしょうか？

ソースは以下の通りです。
Private Sub cmdSearch_Click()
On Error GoTo Err_cmdSearch_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = ChrW(70) & ChrW(95)

stLinkCriteria = "[カナ氏名]=" & "'" & Me![カナ氏名] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_cmdSearch_Click:
Exit Sub

Err_cmdSearch_Click:
MsgBox Err.Description
Resume Exit_cmdSearch_Click

End Sub

No.2 ベストアンサー 回答者： n-jun 回答日時： 2009/09/07 14:37

＞stLinkCriteria = "[カナ氏名]=" & "'" & Me![カナ氏名] & "'"

stLinkCriteria = "[カナ氏名] Like '*" & Me![カナ氏名] & "*'"
でしょうか？

この回答へのお礼

ありがとうございました！
無事動きました。

お礼日時：2009/09/07 16:41