Frage : Multiselect Listbox auf Code zurückgreifen

Ich entwickele eine Schnur (StrHeading) der vorgewählten listbox Einzelteile innerhalb des folgenden für Schleife.  Ich möchte ein Komma zwischen die Einzelteilnamen, aber nicht am Ende der Schnur setzen. (IE. wenn die Wahlen rot blau sind, grün und, ist StrHeading „rot blau, grün,“.)  Was verwende ich für # der Einzelteile, die unten im Code vorgewählt werden?

For jedes varItem in ctl.ItemsSelected
StrHeading = StrHeading u. ctl.ItemData (varItem) im
wenn varItem < # der Einzelteile selected
StrHeading = StrHeading u.“, „
Ende If
StrInsert =“ .......; „
DoCmd.RunSQL StrInsert
Next varItem

Antwort : Multiselect Listbox auf Code zurückgreifen

Die einfachste Weise ist, die Schnur gerade zu analysieren, nachdem Sie sie füllen:

Wenn recht (StrHeading, 1) = „,“ dann StrHeading = recht (StrHeading, Len (StrHeading) - 1)