title image


Smiley Hier ist der Speziallist!
Hi Susanne!Du kannst es so versuchen:Private Sub Command1_Click()    For j = 0 To List.Count - 1        For i = 0 To List(j).ListCount - 1            If List(j).Selected(i) = True Then Text1.Text = Text1.Text + List(j).List(i)        Next i    Next jEnd SubWenn du den Modus Style = 1 benutzt kannst du nicht rausfinden welches Item selectiert ist.Mr. SICQ #67858520

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: