ms-access - Aceess 2007 リスト ボックスで 1 つのアイテムを選択すると、入力を求めるプロンプトが表示されますか?

Question

2 つのオプションを持つリスト ボックスがあります。1 つがデフォルトのオプションですが、[その他] をクリックすると、情報の入力ボックスがポップアップ表示されます。

どうすればこれを達成できますか？

Answer 1

これには、リストボックス afterupdate イベントを使用する必要があります。ユーザーが に入力した内容を返しますusrValue。List0アクセス アプリケーション内のコントロールの名前に変更する必要があります。

Private Sub List0_AfterUpdate()
    Dim usrValue As String   'what the user will by saving there value into.  
    If List0.Value = "OTHER" Then
        usrValue = InputBox("Please enter a value for me", "Need something")
    End If
End Sub