لو سمحتو كيف نجعل الإضافة تظهر في أول سطر وليس في آخر سطر بالـ LiseView

هل يوجد أمر بالـ ListView أو كود لعمل ذالك

السلام عليكم...

عندما تستدعي الوظيفة Add للـ ListItems قم بتحديد الـ Index على 1 كما في المثال التالي:

' قسم التصريحات العام
Private ItemIndex As Long

Private Sub Command2_Click()
    Dim AItem As ListItem

    ItemIndex = ItemIndex + 1
    Set AItem = ListView1.ListItems.Add(1, , "Item" & CStr(ItemIndex))

'    AItem.SubItems(1) = "Subitem" & CStr(ItemIndex) & "-1"
'    AItem.SubItems(2) = "Subitem" & CStr(ItemIndex) & "-2"
End Sub

نرجو الاستفادة و السلام.

شكراً لك اخي najy_zl

الله يعطيك الف عافية

والله يرزقك

الله يعطيكم الف عافية