※ ChatGPTを利用し、要約された質問です(原文:意図しないパラメータの入力が表示される)
意図しないパラメータの入力が表示される
このQ&Aのポイント
既存データベースにある顧客情報をaccessで検索や登録を行おうとしています。検索後は帳票フォームで一覧を表示していてその後に詳細情報を開くようにしたいです。パラメータの入力には利用者のIDが表示され、パラメータにその表示されているIDを入力すると詳細情報が表示されますが、空欄のままOKを押すと何も書かれていない詳細情報が表示されます。このパラメータの入力を表示しないですぐ詳細情報のコマンドボタンを押すと詳細情報を開きたいのですが・・・
顧客情報をaccessで検索や登録したいが、パラメータの入力が意図しないタイミングで表示される問題が発生しています。パラメータに利用者のIDを入力すると詳細情報が表示されますが、空欄のままOKを押すと詳細情報が表示されません。パラメータの入力を表示せずに詳細情報を開くためのコマンドボタンを作成したいです。
accessで顧客情報を検索や登録する際にパラメータの入力が意図しないタイミングで表示される問題が発生しています。パラメータに利用者のIDを入力すると詳細情報が表示されますが、空欄のままOKを押すと詳細情報が表示されません。パラメータの入力を表示せずに直接詳細情報を開くためのコマンドボタンを作成したいです。
既存データベースにある顧客情報をaccessで検索や登録を行おうとしています。
検索後は帳票フォームで一覧を表示していてその後に詳細情報を開くようにしたいです。
1度ここで質問をして解決したのですが、今回なぜか
その「詳細情報を開くためのコマンドボタンを押す」とパラメータの入力という検索クエリなどを使った時のようなものがでてきます
こちらが詳細情報を開くためのコマンドボタンに入れているイベントプロシージャです
Private Sub コマンド60_Click()
On Error GoTo Err_コマンド60_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "詳細情報(利用者名)"
stLinkCriteria = "[riyou_id]=" & Me![riyou_infotb_riyou_id]
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_コマンド60_Click:
Exit Sub
Err_コマンド60_Click:
MsgBox Err.Description
Resume Exit_コマンド60_Click
End Sub
パラメータの入力には利用者のIDが表示され
パラメータにその表示されているIDを入力すると詳細情報がでるのですが
空欄のままOKを押すと何も書かれていない詳細情報が表示されます。
このパラメータの入力を表示しないですぐ詳細情報のコマンドボタンを押すと詳細情報を開きたいのですが・・・
知恵をお貸しくださいお願いします。
お礼
ありがとうございます! 解決できました^^ たすかりましたぁ~~