VBAは、オプションが選択されていてもリストボックスが常にヌルであることを示します。

リストボックスを作成し、GUIからユーザーフォームに追加しました。リストボックスは単一選択であり、1つの列です。 Row Sourceを介して3つのオプションが追加されました。値はジミー「「ジャック」「」」であり、私は VBAは、オプションが選択されていてもリストボックスが常にヌルであることを示します。

If IsNull(Me!List10) Then 
    MsgBox "Please Select A Value!", vbOKOnly 
    Me.List10.SetFocus 
    Exit Sub 
Else 
    selectedoption = Me!List10 
End If

は、今私が持っている問題はまだ知らせる表示値がメッセージボックスを選択した場合でも、選択されたオプションを確保するには、次のVBAを持っていますユーザーは値を選択するため、通過する方法はありません！リストボックスがnullであるかどうかを確認する正しい構文は何ですか？

EDIT
リストボックスが選択されている間、ユーザーは、ユーザーフォーム上のボタンをクリックした場合、この構文は動作します（フォーカスを持っている）、構文は、リストボックスがある場合の値を保持することができないようですフォーカスを持っていません...

出典

2017-05-29 IcyPopTarts

リストボックスの[バインドされた列]プロパティの値は何ですか？ 1である必要があります。そうでないと、リストボックスは常にnullを返します。 – mdialogo

@mdialogo - 1に設定されます。リストボックスは、ボタンが押されたときにフォーカスを持っている場合、リストボックスにフォーカスがない場合はnullを返す場合に適切な値を返します。 – IcyPopTarts

何か別のことが起こっています。ボタンをクリックすると、リストボックスのフォーカスが失われるので、フォーカスが問題ではないと思います。編集、以下を参照してください。 – wazz

あなたの値リストの最初のエントリが初めてであることに気付きませんでした。

「修正」（ハック）はスペースを1つ追加することです。

問題は、最初のエントリが選択されている場合にのみ発生している必要があります。それはそこにある必要がありますか？

出典

2017-05-30 00:37:08 wazz

VBAは、オプションが選択されていてもリストボックスが常にヌルであることを示します。

答えて

関連する問題