איך אני מסמנת בקוד אפשרות אחת או מס´ אפשרויות (כלומר כאילו לחצתי קליק) מתוך תיבת הרשימה ( ListBox) כאשר!! המאפיין MultiSelect הינו Extended-2 תודה נעמה
Private Sub Command1_Click () Dim I ´ Declare variable. ´ Clear all items from the list. List2.Clear ´ If an item is selected, add it to List2. For I = 0 To List1.ListCount - 1 If List1.Selected(I) Then List2.AddItem List1.List(I) End If Next I End Sub