Display value of all items in Listview

Hello,

I just want to display all items in my listiview (not selected, loop all items and display it)

I have the below code

For i = 0 To frm_Main.lv_Main.ListItems.Count - 1
    
            MsgBox frm_Main.lv_Main.ListItems(i).Text
            MsgBox frm_Main.lv_Main.ListItems(i).SubItems(1)
            MsgBox frm_Main.lv_Main.ListItems(i).SubItems(2)
            MsgBox frm_Main.lv_Main.ListItems(i).SubItems(3)

        Next

But I'm getting the below error code

Index out of bounds

Thanks in advance