Microsoft Access 掲示板

Inputboxのように値を入力するまで待つ方法 / 1

2 コメント
views
4 フォロー
1
hatena 2024/09/10 (火) 15:18:10 修正

DoCmd.OpenFormでフォームを開くときに、ダイアログモードを指定すればフォームを閉じる(あるいは非表示になる)まで次のコードにすみません。また、開いている間はユーザーはこのフォーム以外を操作できません。それを利用するといいでしょう。
具体的には、WindowMode引数にacDialogを設定します。   

DoCmd.OpenForm メソッド (Access) | Microsoft Learn

コード例

'テキストボックスのダブルクリック時
Private Sub テキスト1_DblClick(Cancel As Integer)
    Cancel = True
    DoCmd.OpenForm "InputForm", WindowMode:=acDialog
End Sub
'別フォーム(InputForm)上のコマンドボタンのクリック時
Private Sub OKボタン_Click()
    Me.Visible = False '非表示にする
    'ダブルクリックしたテキストボックスがActiveControlになる
    Screen.ActiveControl = Me.コンボ2.Value
    DoCmd.Close acForm, Me.Name
End Sub
通報 ...