2016-05-30 34 views
0

Ich habe ein Listenfeld mit 6 Elementen, und ich habe das Listenfeld zum Ablegen codiert. Meine Frage ist, wie bekomme ich das ausgewählte Element in das Listenfeld, nachdem es ausgewählt wurde. Hier ist der Code, den ich im Lostfocus-Ereignis habe:Ausgewähltes Element in der Listbox anzeigen

+0

Bitte beachte, dass ich die Listbox der Größe nur ein Eintrag zu empfangen. Me.areaLB.Height = 500. Ich möchte, dass das ausgewählte Objekt in dieser Listbox angezeigt wird. – jpl458

+0

Warum benutzen Sie keine Combobox? – LiamH

Antwort

0

Was ist rowsourcetype für BereichLB Listenfeldsteuerung?

Wenn es Werteliste ist, entfernen Sie einfach alle Elemente und fügen Sie einen Datensatz/Wert von AreaGbl Variable.

For nIndex = 0 To areaLB.ListCount - 1 
    areaLB.RemoveItem nIndex 
Next nIndex 

areaLB.AddItem areaGBL

Wenn die RowSourceType ist Tabelle/Abfrage, um die Abfrage von rowsource wie folgt ändern

areaLB.rowsource = "Select <fieldName> from <table name> where  
<fieldname> in '" & areaGBL & "'" 
+0

Es gibt sechs verschiedene Listboxen, einige mit Werteliste und andere mit Abfragen. In Ihrem ersten Beispiel müsste ich die Werteliste speichern und neu laden, nachdem die Listenfelder gelöscht wurden. Müsste etwas ähnliches mit dem zweiten Beispiel tun, die ursprüngliche Abfrage speichern und neu laden. Lassen Sie mich wissen, ob meine Annahmen richtig sind. jpl458 – jpl458

+0

ja, beim Löschen oder Zurücksetzen auf Original. Im Falle der Werteliste benötigen Sie eine originale Werteliste. Deklarieren Sie daher die Variablen und rufen Sie die Werteliste ab, bevor Sie sie zurücksetzen, sodass diese später verwendet werden können, wenn sie gelöscht wurden, um die ursprüngliche Liste zu erhalten. Sie gilt sowohl für Wertelisten als auch für Abfragen. Im Falle einer Werteliste können Sie das Array-Objekt verwenden, um Ihre Arbeit zu erleichtern. –

+0

Ich werde es versuchen. Ich verstehe deinen Code, aber es scheint nur, dass es einen Weg in VBA geben sollte, dies zu tun. Danke für die Hilfe. – jpl458

Verwandte Themen