title image


Smiley Am einfachsten wohl in einem Array...


Dim A() As String, I as Long

For each Itm in Me!MeinListenfeld.Itemsselected

I = I+1

Redim Preserve A(I)

A(I) = Itm

Next Itm





oder auch in einer Collection:



Dim C as New Collection

For each Itm in Me!MeinListenfeld.Itemsselected

C.Add Itm

Next Itm




Gruß aus dem Norden

Reinhard


Bitte immer die Access-Version angeben


 



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: