リストボックスのデータを整形する

Question

私はスクリプトで助けが必要です。 私は、リストボックスといくつかのテキストボックスを持つフォームを持っています。リストボックスの項目を選択すると、一致するデータがそのテキストボックスに表示されます。今、私は別のテキストフィールドの助けを借りてリストボックスを検索したい。

私はリストフィールドを検索して一致するエントリをマークするスクリプトを作成しました。

For i = 0 To Me!lstPlanung.ListCount - 1 

      If Me!lstPlanung.Column(0, i) Like "*" & Me!sidSuche2.Text & "*" Then 

       Me!lstPlanung.Selected(i) = True 
       Exit For 

      End If 

     Next i 

は、しかし、私の問題は、エントリがhighlitedと本当に選択されていないと私はマウスでhighlitedエントリをクリックするまで、データは私のテキストボックスに表示されていないことです。この小さな問題を解決する方法はありますか？

Answer 1

あなたはそれをクリックしたかのようにこれは、イベントを発生させます

Me!lstPlanung.Selected(i) = True 
Call lstPlanung_AfterUpdate() 
      Exit For 

リストボックスの更新手順の後にコールする必要があります。更新後のサブをパブリックにする必要があるかもしれません。